Mercurial > emacs
changeset 71680:9e578ef3e05c
fileio.c (do_auto_save_make_dir): Make the auto-save-list-file
directory unreadable for better user privacy.
author | Stephen Gildea <gildea@stop.mail-abuse.org> |
---|---|
date | Sat, 08 Jul 2006 11:42:40 +0000 |
parents | d59a1ce72785 |
children | 7f64dacbf7f1 |
files | src/ChangeLog src/fileio.c |
diffstat | 2 files changed, 10 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Sat Jul 08 01:45:46 2006 +0000 +++ b/src/ChangeLog Sat Jul 08 11:42:40 2006 +0000 @@ -1,3 +1,8 @@ +2006-07-08 Stephen Gildea <gildea@stop.mail-abuse.org> + + * fileio.c (do_auto_save_make_dir): Make the auto-save-list-file + directory unreadable for better user privacy. + 2006-07-07 Stefan Monnier <monnier@iro.umontreal.ca> * syntax.c (Fforward_comment): Fix int-32 vs EMACS_INT-64 mixup.
--- a/src/fileio.c Sat Jul 08 01:45:46 2006 +0000 +++ b/src/fileio.c Sat Jul 08 11:42:40 2006 +0000 @@ -5853,7 +5853,11 @@ do_auto_save_make_dir (dir) Lisp_Object dir; { - return call2 (Qmake_directory, dir, Qt); + Lisp_Object mode; + + call2 (Qmake_directory, dir, Qt); + XSETFASTINT (mode, 0700); + return Fset_file_modes (dir, mode); } static Lisp_Object