# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 823801618 0
# Node ID 7efdb933356e6ae83d7d46e4d054cb125db93b56
# Parent  5b2bc060c90d6c66f211299098d7ce5fcea6a96e
(Fmake_temp_name) [MS-DOS]: Allow upto 8 characters in
the prefix of the temporary file name.

diff -r 5b2bc060c90d -r 7efdb933356e src/fileio.c
--- a/src/fileio.c	Thu Feb 08 17:27:23 1996 +0000
+++ b/src/fileio.c	Thu Feb 08 17:46:58 1996 +0000
@@ -714,7 +714,13 @@
      Lisp_Object prefix;
 {
   Lisp_Object val;
+#ifdef MSDOS
+  /* Don't use too much characters of the restricted 8+3 DOS
+     filename space.  */
+  val = concat2 (prefix, build_string (".XXX"));
+#else
   val = concat2 (prefix, build_string ("XXXXXX"));
+#endif
   mktemp (XSTRING (val)->data);
   return val;
 }