# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 766131989 0
# Node ID 903d03ddf99cc9c5c40ab2f89e153797f89b429d
# Parent  f70a517ae9e28ef99a61d5b650186385288d50e8
(specbind): Use find_symbol_value.

diff -r f70a517ae9e2 -r 903d03ddf99c src/eval.c
--- a/src/eval.c	Tue Apr 12 06:06:21 1994 +0000
+++ b/src/eval.c	Tue Apr 12 06:26:29 1994 +0000
@@ -2263,8 +2263,7 @@
     grow_specpdl ();
   specpdl_ptr->symbol = symbol;
   specpdl_ptr->func = 0;
-  ovalue = XSYMBOL (symbol)->value;
-  specpdl_ptr->old_value = EQ (ovalue, Qunbound) ? Qunbound : Fsymbol_value (symbol);
+  specpdl_ptr->old_value = ovalue = find_symbol_value (symbol);
   specpdl_ptr++;
   if (XTYPE (ovalue) == Lisp_Buffer_Objfwd)
     store_symval_forwarding (symbol, ovalue, value);