From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 9 Sep 1999 04:24:12 +0000 (+0000)
Subject: (Fwrite_region): Finish renaming CONFIRM to MUSTBENEW.
X-Git-Tag: emacs-pretest-21.0.90~6827
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=72bba429ca2f0a2b93aec486804956097f89fa1e;p=emacs.git

(Fwrite_region): Finish renaming CONFIRM to MUSTBENEW.
(Fwrite_region) [DOS_NT]: Handle `excl' here too.
---

diff --git a/src/fileio.c b/src/fileio.c
index 579258f5236..efe7f432e2a 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -4412,7 +4412,7 @@ This does code conversion according to the value of\n\
 
   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 @@ This does code conversion according to the value of\n\
 #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 */