diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-04-12 06:26:29 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-04-12 06:26:29 +0000 |
| commit | d0f7cdc847f9b59dc928b042299a2617c6b3d095 (patch) | |
| tree | 710259ea96a48d39554f65d612aabb7f6c6a8cd0 /src/eval.c | |
| parent | a782f0d57f9e71e984f042a6dd2545a3393b3d71 (diff) | |
| download | emacs-d0f7cdc847f9b59dc928b042299a2617c6b3d095.tar.gz emacs-d0f7cdc847f9b59dc928b042299a2617c6b3d095.tar.bz2 emacs-d0f7cdc847f9b59dc928b042299a2617c6b3d095.zip | |
(specbind): Use find_symbol_value.
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/eval.c b/src/eval.c index fa67a453f30..254913727bc 100644 --- a/src/eval.c +++ b/src/eval.c @@ -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); |