Mercurial > emacs

diff src/editfns.c @ 90776:dd7c098af727

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 638-652) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 202) - Update from CVS Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-177
author Miles Bader <miles@gnu.org>
date Mon, 26 Feb 2007 23:03:45 +0000
parents 95d0cdf160ea d420b7899f20
children c0409ee15cee
line wrap: on
line diff
--- a/src/editfns.c	Fri Feb 23 06:03:48 2007 +0000
+++ b/src/editfns.c	Mon Feb 26 23:03:45 2007 +0000
@@ -3528,7 +3528,7 @@
 
 The basic structure of a %-sequence is
   % <flags> <width> <precision> character
-where flags is [- #0]+, width is [0-9]+, and precision is .[0-9]+
+where flags is [-+ #0]+, width is [0-9]+, and precision is .[0-9]+
 
 usage: (format STRING &rest OBJECTS)  */)
      (nargs, args)
@@ -3641,7 +3641,7 @@
 
 	   where
 
-	   flags	::= [- #0]+
+	   flags	::= [-+ #0]+
 	   field-width	::= [0-9]+
 	   precision	::= '.' [0-9]*
 
@@ -3655,7 +3655,7 @@
 
 	while (format != end
 	       && (*format == '-' || *format == '0' || *format == '#'
-		   || * format == ' '))
+		   || * format == ' ' || *format == '+'))
 	  ++format;
 
 	if (*format >= '0' && *format <= '9')
@@ -3832,7 +3832,7 @@
 	  discarded[format - format_start] = 1;
 	  format++;
 
-	  while (index("-0# ", *format))
+	  while (index("-+0# ", *format))
 	    {
 	      if (*format == '-')
 		{