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

(Fsave_current_buffer): Use set_buffer_if_live.

parent acfd1011
......@@ -402,7 +402,7 @@ Executes BODY just like `progn'.")
register Lisp_Object val;
int count = specpdl_ptr - specpdl;
record_unwind_protect (Fset_buffer, Fcurrent_buffer ());
record_unwind_protect (set_buffer_if_live, Fcurrent_buffer ());
val = Fprogn (args);
return unbind_to (count, val);
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