Mercurial > emacs
diff src/fileio.c @ 25615:c60d7a800e9c
(Fwrite_region): Finish renaming CONFIRM to MUSTBENEW.
(Fwrite_region) [DOS_NT]: Handle `excl' here too.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 09 Sep 1999 04:24:12 +0000 |
| parents | 16a9c3c6f90e |
| children | 0a7261c1d487 |
line wrap: on
line diff
--- 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 */