Mercurial > emacs
changeset 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 | 766b6a577f15 |
| children | 4dbea85f5af0 |
| files | src/fileio.c |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
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 */