From: kaoru <kaoru>
Date: Fri, 1 Jan 2010 12:33:25 +0000 (+0000)
Subject: Fix last `wl-kill-buffers' change.
X-Git-Tag: elmo-imap4-compliance-root~65
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=a28d2fd21dd5eaa063f63019ce7d70f723c395aa;p=elisp%2Fwanderlust.git

Fix last `wl-kill-buffers' change.
---

diff --git a/wl/wl-util.el b/wl/wl-util.el
index 9afc7b6..34e56e8 100644
--- a/wl/wl-util.el
+++ b/wl/wl-util.el
@@ -510,8 +510,8 @@ that `read' can handle, whenever this is possible."
       (if (and (buffer-name x)
 	       (string-match ,regexp (buffer-name x)))
 	  (and (get-buffer x)
-	       (kill-buffer x)))))
-  (buffer-list))
+	       (kill-buffer x))))
+    (buffer-list)))
 
 (defun wl-collect-summary ()
   (let (result)