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

(unbind_to, specbind): Use set_internal.

parent 4b5878a8
......@@ -2648,7 +2648,7 @@ specbind (symbol, value)
if (BUFFER_OBJFWDP (ovalue) || KBOARD_OBJFWDP (ovalue))
store_symval_forwarding (symbol, ovalue, value);
Fset (symbol, value);
set_internal (symbol, value, 1);
......@@ -2686,7 +2686,7 @@ unbind_to (count, value)
else if (NILP (specpdl_ptr->symbol))
Fprogn (specpdl_ptr->old_value);
Fset (specpdl_ptr->symbol, specpdl_ptr->old_value);
set_internal (specpdl_ptr->symbol, specpdl_ptr->old_value, 1);
if (NILP (Vquit_flag) && quitf) Vquit_flag = Qt;
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