From: hmurata <hmurata>
Date: Sun, 28 Sep 2003 15:40:05 +0000 (+0000)
Subject: * wl-summary.el (wl-summary-window-scroll-functions): No use
X-Git-Tag: wl-2_11_19~33
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=51b504432a9917fce4e12f8324a93ac39aa5fd0f;p=elisp%2Fwanderlust.git

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

diff --git a/wl/ChangeLog b/wl/ChangeLog
index a5c701a..3d0183d 100644
--- 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
--- 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)