From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 21 Jan 1998 21:40:51 +0000 (+0000)
Subject: (Fsave_current_buffer): Use set_buffer_if_live.
X-Git-Tag: emacs-20.3~2378
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cb5e5f74c40f9a6ea04e8314852f3129aced6f6f;p=emacs.git

(Fsave_current_buffer): Use set_buffer_if_live.
---

diff --git a/src/editfns.c b/src/editfns.c
index fa6881c35b3..698abeadae8 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -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);