From a7a99acd94bb44b9dc5ca9edb24090b09bf1a50b Mon Sep 17 00:00:00 2001 From: teranisi Date: Mon, 23 Oct 2000 02:26:56 +0000 Subject: [PATCH] 2000-10-18 SAITO Atsunori * wl-summary.el (wl-summary-print-destination): Adjust line length. --- wl/ChangeLog | 4 ++++ wl/wl-summary.el | 1 + 2 files changed, 5 insertions(+) diff --git a/wl/ChangeLog b/wl/ChangeLog index 3ad2213..f4abd4c 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,7 @@ +2000-10-18 SAITO Atsunori + + * wl-summary.el (wl-summary-print-destination): Adjust line length. + 2000-10-20 TAKAHASHI Kaoru * tm-wl.el (toplevel): Use product-provide. diff --git a/wl/wl-summary.el b/wl/wl-summary.el index 7d98ab5..8c299ee 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -3424,6 +3424,7 @@ If optional argument NUMBER is specified, mark message specified by NUMBER." (while (< c len) (forward-char -1) (setq c (+ c (char-width (following-char))))) + (and (> c len) (setq folder (concat " " folder))) (setq rs (point)) (put-text-property rs re 'invisible t) (put-text-property rs re 'wl-summary-destination t) -- 1.7.10.4