Mercurial > emacs

comparison src/buffer.c @ 7994:c5b7f74b5023

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fkill_buffer): Don't delete auto save file if it didn't come from this Emacs session.
author Richard M. Stallman <rms@gnu.org>
date Tue, 21 Jun 1994 17:52:18 +0000
parents f6c309d5d314
children 7f68b0db826f
comparison
equal deleted inserted replaced
7993:fde315722669 7994:c5b7f74b5023
799 Vinhibit_quit = Qt; 799 Vinhibit_quit = Qt;
800 Vbuffer_alist = Fdelq (Frassq (buf, Vbuffer_alist), Vbuffer_alist); 800 Vbuffer_alist = Fdelq (Frassq (buf, Vbuffer_alist), Vbuffer_alist);
801 Freplace_buffer_in_windows (buf); 801 Freplace_buffer_in_windows (buf);
802 Vinhibit_quit = tem; 802 Vinhibit_quit = tem;
803 803
804 /* Delete any auto-save file. */ 804 /* Delete any auto-save file, if we saved it in this session. */
805 if (XTYPE (b->auto_save_file_name) == Lisp_String) 805 if (XTYPE (b->auto_save_file_name) == Lisp_String
806 && b->auto_save_modified != 0)
806 { 807 {
807 Lisp_Object tem; 808 Lisp_Object tem;
808 tem = Fsymbol_value (intern ("delete-auto-save-files")); 809 tem = Fsymbol_value (intern ("delete-auto-save-files"));
809 if (! NILP (tem)) 810 if (! NILP (tem))
810 unlink (XSTRING (b->auto_save_file_name)->data); 811 unlink (XSTRING (b->auto_save_file_name)->data);