Commit d674d13e authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Fother_buffer): Don't crash if BUF is nil

or if its name is nil.

(Fkill_buffer): Don't delete auto-save file
if it's the same as the visited file.
parent de1d1a40
......@@ -89,10 +89,6 @@ static Lisp_Object Vbuffer_defaults;
If a slot is -2, then there is no DEFVAR_PER_BUFFER for it,
but there is a default value which is copied into each buffer.
If a slot in this structure is negative, then even though there may
be a DEFVAR_PER_BUFFER for the slot, there is no default value for it;
and the corresponding slot in buffer_defaults is not used.
If a slot in this structure corresponding to a DEFVAR_PER_BUFFER is
zero, that is a bug */
......@@ -1202,6 +1198,10 @@ If BUFFER is omitted or nil, some interesting buffer is returned. */)
buf = Fcdr (XCAR (tail));
if (EQ (buf, buffer))
if (NILP (buf))
if (NILP (XBUFFER (buf)->name))
if (SREF (XBUFFER (buf)->name, 0) == ' ')
/* If the selected frame has a buffer_predicate,
......@@ -1429,7 +1429,8 @@ with SIGHUP. */)
if (STRINGP (b->auto_save_file_name)
&& b->auto_save_modified != 0
&& BUF_SAVE_MODIFF (b) < b->auto_save_modified
&& NILP (Fsymbol_value (intern ("auto-save-visited-file-name"))))
Lisp_Object tem;
tem = Fsymbol_value (intern ("delete-auto-save-files"));
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment