* wl-summary.el (wl-summary-mode): Don't use the return value of

`make-local-hook'.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 0afd94a..f2a9102 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2003-10-02  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * wl-summary.el (wl-summary-mode): Don't use the return value of
+       `make-local-hook'.
+
 2003-10-02  Tetsurou Okazaki  <okazaki@be.to>
 
        * wl-thread.el (wl-thread-entity-get-older-brothers): Use `let'

diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index 1d8edcf..9d55db1 100644 (file)
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -819,9 +819,8 @@ Entering Folder mode calls the value of `wl-summary-mode-hook'."
   (setq wl-summary-buffer-window-scroll-functions
        (wl-summary-window-scroll-functions))
   (when wl-summary-buffer-window-scroll-functions
-    (let ((hook (make-local-hook (if wl-on-xemacs
-                                    'pre-idle-hook
-                                  'window-scroll-functions))))
+    (let ((hook (if wl-on-xemacs 'pre-idle-hook 'window-scroll-functions)))
+      (make-local-hook hook)
       (dolist (function wl-summary-buffer-window-scroll-functions)
        (add-hook hook function nil t))))
   ;; This hook may contain the function `wl-setup-summary' for reasons