From: hmurata <hmurata>
Date: Tue, 12 Aug 2003 07:04:56 +0000 (+0000)
Subject: * wl-action.el (wl-summary-print-argument): Fixed last change.
X-Git-Tag: wl-2_11_8~14
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=647f9ff0acc453d3dccda327cf59195352b9f47a;p=elisp%2Fwanderlust.git

* wl-action.el (wl-summary-print-argument): Fixed last change.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index a55d6ff..03a6197 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2003-08-12  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+	* wl-action.el (wl-summary-print-argument): Fixed last change.
+
 2003-08-11  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
 	* wl-summary.el (wl-summary-target-mark-mark-as-read): Fixed and
diff --git a/wl/wl-action.el b/wl/wl-action.el
index 7612fe0..a138d3e 100644
--- a/wl/wl-action.el
+++ b/wl/wl-action.el
@@ -760,7 +760,8 @@ Return number if put mark succeed"
 	  (search-forward "\r")
 	  (forward-char -1)
 	  (setq re (point))
-	  (let ((width (cond (wl-summary-width)
+	  (let ((width (cond (wl-summary-width
+			      (1- wl-summary-width))
 			     (wl-summary-print-argument-within-window
 			      (1- (window-width)))))
 		(c (current-column))