(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 (file)
--- 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))))