# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 936851052 0
# Node ID c60d7a800e9c2266c080e67a23b46f39bef85160
# Parent  766b6a577f1581c2b67ce287eec8494ee97a56e2
(Fwrite_region): Finish renaming CONFIRM to MUSTBENEW.
(Fwrite_region) [DOS_NT]: Handle `excl' here too.

diff -r 766b6a577f15 -r c60d7a800e9c src/fileio.c
--- a/src/fileio.c	Wed Sep 08 22:12:34 1999 +0000
+++ b/src/fileio.c	Thu Sep 09 04:24:12 1999 +0000
@@ -4412,7 +4412,7 @@
 
   filename = Fexpand_file_name (filename, Qnil);
 
-  if (! NILP (confirm) && confirm != Qexcl)
+  if (! NILP (mustbenew) && mustbenew != Qexcl)
     barf_or_query_if_file_exists (filename, "overwrite", 1, 0, 1);
 
   if (STRINGP (visit))
@@ -4546,11 +4546,12 @@
 #else /* not VMS */
 #ifdef DOS_NT
   desc = open (fn,
-	       O_WRONLY | O_TRUNC | O_CREAT | buffer_file_type,
+	       O_WRONLY | O_TRUNC | O_CREAT | buffer_file_type
+	       | (mustbenew == Qexcl ? O_EXCL : 0),
 	       S_IREAD | S_IWRITE);
 #else  /* not DOS_NT */
   desc = open (fn, O_WRONLY | O_TRUNC | O_CREAT
-	       | (confirm == Qexcl ? O_EXCL : 0),
+	       | (mustbenew == Qexcl ? O_EXCL : 0),
 	       auto_saving ? auto_save_mode_bits : 0666);
 #endif /* not DOS_NT */
 #endif /* not VMS */