mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-25 23:10:47 -08:00
Code Issues Projects Releases Wiki Activity

(Fdo_auto_save): Don't try to create the directory of

Browse source 
auto-save-list-file-name when shutting down Emacs, because
creating the directory might signal an error, and leaves
Emacs in a strange state.
This commit is contained in:
Gerd Moellmann 2001-05-31 09:59:12 +00:00
parent 94843cc1b1
commit 0894672ffa
2 changed files with 17 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/ChangeLog
View file

@ -1,5 +1,10 @@
2001-05-31 Gerd Moellmann <gerd@gnu.org>
* fileio.c (Fdo_auto_save): Don't try to create the directory of
auto-save-list-file-name when shutting down Emacs, because
creating the directory might signal an error, and leaves
Emacs in a strange state.
* term.c: (tty_cursor_hidden): New variable.
(update_begin): Don't call tty_hide_cursor. Clean up.
(update_end, set_terminal_window, set_scroll_region): Clean up.

17
src/fileio.c
View file

@ -5370,13 +5370,20 @@ A non-nil CURRENT-ONLY argument means save only current buffer.")
if (STRINGP (Vauto_save_list_file_name))
{
Lisp_Object listfile, dir;
Lisp_Object listfile;
listfile = Fexpand_file_name (Vauto_save_list_file_name, Qnil);
dir = Ffile_name_directory (listfile);
if (NILP (Ffile_directory_p (dir)))
call2 (Qmake_directory, dir, Qt);
/* Don't try to create the directory when shutting down Emacs,
because creating the directory might signal an error, and
that would leave Emacs in a strange state. */
if (!NILP (Vrun_hooks))
{
Lisp_Object dir;
dir = Ffile_name_directory (listfile);
if (NILP (Ffile_directory_p (dir)))
call2 (Qmake_directory, dir, Qt);
}
stream = fopen (XSTRING (listfile)->data, "w");
if (stream != NULL)