* wl-summary.el (wl-summary-window-scroll-functions): No use

`append'.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index a5c701a..3d0183d 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2003-09-28  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * wl-summary.el (wl-summary-window-scroll-functions): No use
+       `append'.
+
 2003-09-28  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * wl-summary.el (wl-summary-update-mark-and-highlight-window): New

diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index 2c6c870..5972b83 100644 (file)
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -587,12 +587,10 @@ See also variable `wl-use-petname'."
             ((and wl-summary-lazy-highlight
                   wl-summary-lazy-update-mark)
              (list 'wl-summary-update-mark-and-highlight-window))
-            (t
-             (append
-              (and wl-summary-lazy-highlight
-                   '(wl-highlight-summary-window))
-              (and wl-summary-lazy-update-mark
-                   '(wl-summary-update-mark-window))))))))
+            (wl-summary-lazy-highlight
+             (list 'wl-highlight-summary-window))
+            (wl-summary-lazy-update-mark
+             (list 'wl-summary-update-mark-window))))))
 
 (defun wl-status-update ()
   (interactive)