# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 885418887 0
# Node ID 6c8ba5a6147b45b284e4bad1e503de067fb01659
# Parent  cdbe4824e7f17e7d6e0663a985d7a40ad3bdbfd1
(Fbyte_code) <Bsave_current_buffer_1>: Use set_buffer_if_live.

diff -r cdbe4824e7f1 -r 6c8ba5a6147b src/bytecode.c
--- a/src/bytecode.c	Wed Jan 21 21:40:51 1998 +0000
+++ b/src/bytecode.c	Wed Jan 21 21:41:27 1998 +0000
@@ -578,7 +578,7 @@
 
 	case Bsave_current_buffer:
 	case Bsave_current_buffer_1:
-	  record_unwind_protect (Fset_buffer, Fcurrent_buffer ());
+	  record_unwind_protect (set_buffer_if_live, Fcurrent_buffer ());
 	  break;
 
 	case Bsave_window_excursion: