From: okazaki <okazaki>
Date: Tue, 24 Aug 2004 18:24:42 +0000 (+0000)
Subject: (wl-folder-set-folder-updated): Initialize the local variable `buf' with `let'
X-Git-Tag: wl-2_11_31~37
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=93a05276df474d73816d7315a008857408ac03e4;p=elisp%2Fwanderlust.git

(wl-folder-set-folder-updated): Initialize the local variable `buf' with `let'
 instead of `setq'.
---

diff --git a/wl/wl-folder.el b/wl/wl-folder.el
index 175e972..5cf452f 100644
--- a/wl/wl-folder.el
+++ b/wl/wl-folder.el
@@ -1577,8 +1577,8 @@ Entering Folder mode calls the value of `wl-folder-mode-hook'."
 
 (defun wl-folder-set-folder-updated (name value)
   (save-excursion
-    (let (buf)
-      (if (setq buf (get-buffer wl-folder-buffer-name))
+    (let ((buf (get-buffer wl-folder-buffer-name)))
+      (if buf
 	  (wl-folder-entity-hashtb-set
 	   wl-folder-entity-hashtb name value buf))
       (setq wl-folder-info-alist-modified t))))