Mercurial > emacs
diff src/data.c @ 21476:bf0a3e277594
(set_internal, Fmakunbound): Fix previous change.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Sun, 12 Apr 1998 06:41:01 +0000 |
| parents | 78c4044476c0 |
| children | fa9ff387d260 |
line wrap: on
line diff
--- a/src/data.c Sat Apr 11 18:16:01 1998 +0000 +++ b/src/data.c Sun Apr 12 06:41:01 1998 +0000 @@ -617,8 +617,7 @@ CHECK_SYMBOL (symbol, 0); if (NILP (symbol) || EQ (symbol, Qt) || (XSYMBOL (symbol)->name->data[0] == ':' - && keyword_symbols_constant_flag - && ! EQ (XSYMBOL (symbol)->value, symbol))) + && keyword_symbols_constant_flag)) return Fsignal (Qsetting_constant, Fcons (symbol, Qnil)); Fset (symbol, Qunbound); return symbol; @@ -969,8 +968,7 @@ CHECK_SYMBOL (symbol, 0); if (NILP (symbol) || EQ (symbol, Qt) || (XSYMBOL (symbol)->name->data[0] == ':' - && keyword_symbols_constant_flag - && ! EQ (XSYMBOL (symbol)->value, symbol))) + && keyword_symbols_constant_flag && ! EQ (newval, symbol))) return Fsignal (Qsetting_constant, Fcons (symbol, Qnil)); valcontents = XSYMBOL (symbol)->value;