From: teranisi Date: Mon, 28 Jul 2003 06:12:16 +0000 (+0000) Subject: * wl-expire.el (wl-summary-expire): Fixed 2nd argument for wl-append. X-Git-Tag: wl-2_11_5~24 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=06227dfc175859203938301e723030b2e27e9f02;p=elisp%2Fwanderlust.git * wl-expire.el (wl-summary-expire): Fixed 2nd argument for wl-append. (Reported by Shinichiro HIDA ) --- diff --git a/wl/ChangeLog b/wl/ChangeLog index f5a3a00..99cb690 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,5 +1,8 @@ 2003-07-28 Yuuichi Teranishi + * wl-expire.el (wl-summary-expire): Fixed 2nd argument for `wl-append'. + (Reported by Shinichiro HIDA ) + * wl-summary.el (wl-summary-target-mark-reply-with-citation): Check return value of wl-summary-reply. (wl-summary-reply): Recover window configuration when an error occured. diff --git a/wl/wl-expire.el b/wl/wl-expire.el index 588249e..f598b17 100644 --- a/wl/wl-expire.el +++ b/wl/wl-expire.el @@ -661,7 +661,7 @@ ex. +ml/wl/1999_11/, +ml/wl/1999_12/." key-date (elmo-message-entity-field entity 'date)) (wl-append delete-list - (elmo-message-entity-number entity)))))) + (list (elmo-message-entity-number entity))))))) (t (error "%s: not supported" val-type))) (when delete-list