diff src/fileio.c @ 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 2414d21c77fa
children 8134ee20ca71
line wrap: on
line diff
--- 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