Mercurial > emacs

comparison src/fileio.c @ 89995:58db929d96c6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: miles@gnu.org--gnu-2004/emacs--unicode--0--patch-50 Merge from emacs--cvs-trunk--0 Patches applied: * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-587 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-588 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-589 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-590 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-593 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-39 Merge from emacs--cvs-trunk--0 * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-40 - miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-41 Update from CVS
author Miles Bader <miles@gnu.org>
date Mon, 04 Oct 2004 01:04:18 +0000
parents d7211599ad16 b2a68db48f92
children 226b3b1d1aff
comparison
equal deleted inserted replaced
89994:298e7fb11b61 89995:58db929d96c6
5632 /* Get visited file's mode to become the auto save file's mode. */ 5632 /* Get visited file's mode to become the auto save file's mode. */
5633 if (! NILP (current_buffer->filename) 5633 if (! NILP (current_buffer->filename)
5634 && stat (SDATA (current_buffer->filename), &st) >= 0) 5634 && stat (SDATA (current_buffer->filename), &st) >= 0)
5635 /* But make sure we can overwrite it later! */ 5635 /* But make sure we can overwrite it later! */
5636 auto_save_mode_bits = st.st_mode | 0600; 5636 auto_save_mode_bits = st.st_mode | 0600;
5637 else if (! NILP (current_buffer->filename))
5638 /* Remote files don't cooperate with stat. */
5639 auto_save_mode_bits = XINT (Ffile_modes (current_buffer->filename)) | 0600;
5637 else 5640 else
5638 auto_save_mode_bits = 0666; 5641 auto_save_mode_bits = 0666;
5639 5642
5640 return 5643 return
5641 Fwrite_region (Qnil, Qnil, 5644 Fwrite_region (Qnil, Qnil,