From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 22 May 2005 02:54:12 +0000 (+0000)
Subject: (display_mode_element): If we're processing a list and
X-Git-Tag: ttn-vms-21-2-B4~81
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5c213fcc8641d0b01fb84fe965f5aeecc9eef392;p=emacs.git

(display_mode_element): If we're processing a list and
padding is specified, put it after the last element.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index dc474221503..ff5cf7a32d2 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2005-05-21  Richard M. Stallman  <rms@gnu.org>
+
+	* xdisp.c (display_mode_element): If we're processing a list and
+	padding is specified, put it after the last element.
+
 2005-05-21  Eli Zaretskii  <eliz@gnu.org>
 
 	* fileio.c (Fexpand_file_name) [DOS_NT]: Don't try to support
diff --git a/src/xdisp.c b/src/xdisp.c
index 628688c2f07..5297b1235e9 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -16033,7 +16033,12 @@ display_mode_element (it, depth, field_width, precision, elt, props, risky)
 		   && --limit > 0
 		   && (precision <= 0 || n < precision))
 	      {
-		n += display_mode_element (it, depth, field_width - n,
+		n += display_mode_element (it, depth,
+					   /* Do padding only after the last
+					      element in the list.  */
+					   (! CONSP (XCDR (elt))
+					    ? field_width - n
+					    : 0),
 					   precision - n, XCAR (elt),
 					   props, risky);
 		elt = XCDR (elt);