From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 28 Oct 2005 16:26:45 +0000 (+0000)
Subject: (Fformat): Don't include string padding
X-Git-Tag: emacs-pretest-22.0.90~6240
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8f2c9ed8c9cb82dbfb9f9622e2285eccbc63ddf7;p=emacs.git

(Fformat): Don't include string padding
between info[n].start and info[n].end.
---

diff --git a/src/editfns.c b/src/editfns.c
index e7b152726e3..5605a25bdd2 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -3662,7 +3662,7 @@ usage: (format STRING &rest OBJECTS)  */)
 		    ++nchars;
 		  }
 
-	      start = nchars;
+	      info[n].start = start = nchars;
 	      nchars += nchars_string;
 	      end = nchars;
 
@@ -3677,6 +3677,8 @@ usage: (format STRING &rest OBJECTS)  */)
 			      nbytes,
 			      STRING_MULTIBYTE (args[n]), multibyte);
 
+	      info[n].end = nchars;
+
 	      if (negative)
 		while (padding-- > 0)
 		  {
@@ -3713,9 +3715,9 @@ usage: (format STRING &rest OBJECTS)  */)
 	      else
 		p += this_nchars;
 	      nchars += this_nchars;
+	      info[n].end = nchars;
 	    }
 
-	  info[n].end = nchars;
 	}
       else if (STRING_MULTIBYTE (args[0]))
 	{