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

(specbind): Use find_symbol_value.

parent a782f0d5
......@@ -2263,8 +2263,7 @@ specbind (symbol, value)
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);
......
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