diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2009-03-01 19:22:22 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2009-03-01 19:22:22 +0000 |
commit | f13f18d9f50018775e287d6ecc7e7d855b0d98a3 (patch) | |
tree | d1136407a108b4f13b95d257c0b2814a6a783de6 /lisp/abbrev.el | |
parent | b597e547374c917e2193db79de61b5368106bd8f (diff) | |
download | emacs-f13f18d9f50018775e287d6ecc7e7d855b0d98a3.tar.gz |
(clear-abbrev-table): Always return nil (Bug#2515).
Diffstat (limited to 'lisp/abbrev.el')
-rw-r--r-- | lisp/abbrev.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/abbrev.el b/lisp/abbrev.el index 0e8b2cf9e8a..5b4ffe3ae8f 100644 --- a/lisp/abbrev.el +++ b/lisp/abbrev.el @@ -521,7 +521,8 @@ the current abbrev table before abbrev lookup happens." (set newsym nil) ; Make sure it won't be confused for an abbrev. (setplist newsym (symbol-plist sym))) (abbrev-table-put table :abbrev-table-modiff - (1+ (abbrev-table-get table :abbrev-table-modiff))))) + (1+ (abbrev-table-get table :abbrev-table-modiff)))) + nil) (defun define-abbrev (table name expansion &optional hook &rest props) "Define an abbrev in TABLE named NAME, to expand to EXPANSION and call HOOK. |