From cb5e5f74c40f9a6ea04e8314852f3129aced6f6f Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 21 Jan 1998 21:40:51 +0000 Subject: [PATCH] (Fsave_current_buffer): Use set_buffer_if_live. --- src/editfns.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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); -- 2.39.2