# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 870143372 0
# Node ID 84ae0a03a64307ce97566507d08a384ade391cf2
# Parent  369a8580b08e98556eb19aa7d035a94ffae52c17
(Fformat_time_string): Don't hang if strftime produces
an empty string.  Fix arguments of second call to strftime.
Remove check for result being negative, this cannot happen.

diff -r 369a8580b08e -r 84ae0a03a643 src/editfns.c
--- a/src/editfns.c	Tue Jul 29 02:15:28 1997 +0000
+++ b/src/editfns.c	Tue Jul 29 02:29:32 1997 +0000
@@ -874,16 +874,15 @@
       char *buf = (char *) alloca (size + 1);
       int result;
 
+      buf[0] = '\1';
       result = emacs_strftime (buf, size, XSTRING (format_string)->data,
 			       (NILP (universal) ? localtime (&value)
 				: gmtime (&value)));
-      if (result > 0 && result < size)
+      if ((result > 0 && result < size) || (result == 0 && buf[0] == '\0'))
 	return build_string (buf);
-      if (result < 0)
-	error ("Invalid time format specification");
 
       /* If buffer was too small, make it bigger and try again.  */
-      result = emacs_strftime (buf, 0, XSTRING (format_string)->data,
+      result = emacs_strftime (NULL, 0x7fffffff, XSTRING (format_string)->data,
 			       (NILP (universal) ? localtime (&value)
 				: gmtime (&value)));
       size = result + 1;