diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2019-04-01 12:35:10 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2019-04-01 12:35:10 -0400 |
| commit | 197fbfc71f49b307baa3831a30732c3a0c4c7420 (patch) | |
| tree | 4a2ba9e37277cda9bcc0aa43dba56ff6503f32a1 /lisp/abbrev.el | |
| parent | 20ef15fbe6d49b0bb8a1841dbe4665cf81a567d7 (diff) | |
| download | emacs-197fbfc71f49b307baa3831a30732c3a0c4c7420.tar.gz emacs-197fbfc71f49b307baa3831a30732c3a0c4c7420.tar.bz2 emacs-197fbfc71f49b307baa3831a30732c3a0c4c7420.zip | |
* lisp/subr.el (setq-default): Define as a macro
* lisp/emacs-lisp/bytecomp.el (byte-compile-setq-default): Delete.
(byte-compile-set-default): Inline the part that it used.
* lisp/emacs-lisp/edebug.el (setq-default): Remove the debug spec.
* src/data.c (Fsetq_default): Delete.
(syms_of_data): Don't register.
Diffstat (limited to 'lisp/abbrev.el')
| -rw-r--r-- | lisp/abbrev.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/abbrev.el b/lisp/abbrev.el index 855d80cbd5a..3c88ec661a9 100644 --- a/lisp/abbrev.el +++ b/lisp/abbrev.el @@ -940,8 +940,7 @@ If READABLE is nil, an expression is inserted. The expression is a call to `define-abbrev-table' that when evaluated will define the abbrev table NAME exactly as it is currently defined. Abbrevs marked as \"system abbrevs\" are ignored." - (let ((table (symbol-value name)) - (symbols (abbrev--table-symbols name readable))) + (let ((symbols (abbrev--table-symbols name readable))) (setq symbols (sort symbols 'string-lessp)) (let ((standard-output (current-buffer))) (if readable |