aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/eval.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/eval.c b/src/eval.c
index 97dbf8f1579..161861e41ed 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -2648,7 +2648,7 @@ specbind (symbol, value)
2648 if (BUFFER_OBJFWDP (ovalue) || KBOARD_OBJFWDP (ovalue)) 2648 if (BUFFER_OBJFWDP (ovalue) || KBOARD_OBJFWDP (ovalue))
2649 store_symval_forwarding (symbol, ovalue, value); 2649 store_symval_forwarding (symbol, ovalue, value);
2650 else 2650 else
2651 Fset (symbol, value); 2651 set_internal (symbol, value, 1);
2652} 2652}
2653 2653
2654void 2654void
@@ -2686,7 +2686,7 @@ unbind_to (count, value)
2686 else if (NILP (specpdl_ptr->symbol)) 2686 else if (NILP (specpdl_ptr->symbol))
2687 Fprogn (specpdl_ptr->old_value); 2687 Fprogn (specpdl_ptr->old_value);
2688 else 2688 else
2689 Fset (specpdl_ptr->symbol, specpdl_ptr->old_value); 2689 set_internal (specpdl_ptr->symbol, specpdl_ptr->old_value, 1);
2690 } 2690 }
2691 if (NILP (Vquit_flag) && quitf) Vquit_flag = Qt; 2691 if (NILP (Vquit_flag) && quitf) Vquit_flag = Qt;
2692 2692