From cedee10441ac232bcba8cb6a559daca983d7ad43 Mon Sep 17 00:00:00 2001 From: hmurata Date: Thu, 2 Oct 2003 13:19:34 +0000 Subject: [PATCH] * wl-summary.el (wl-summary-mode): Don't use the return value of `make-local-hook'. --- wl/ChangeLog | 5 +++++ wl/wl-summary.el | 5 ++--- 2 files changed, 7 insertions(+), 3 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 0afd94a..f2a9102 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2003-10-02 Hiroya Murata + + * wl-summary.el (wl-summary-mode): Don't use the return value of + `make-local-hook'. + 2003-10-02 Tetsurou Okazaki * 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 --- 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 -- 1.7.10.4