summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-02-08 17:46:58 +0000
committerRichard M. Stallman <rms@gnu.org>1996-02-08 17:46:58 +0000
commit79396ebd710e94a30924aaa00ae959c20d4d43c2 (patch)
treeee39407ea16668d7ca2f8df837453a7e562399c7
parent94e5223ab031aa7f60045ef9e5f00160c71f0f6e (diff)
downloademacs-79396ebd710e94a30924aaa00ae959c20d4d43c2.tar.gz
(Fmake_temp_name) [MS-DOS]: Allow upto 8 characters in
the prefix of the temporary file name.
-rw-r--r--src/fileio.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/fileio.c b/src/fileio.c
index ec7d710cd36..f138e6e458e 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -714,7 +714,13 @@ so there is no danger of generating a name being used by another process.")
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;
}