aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong <[email protected]>2009-03-01 19:22:22 +0000
committerChong Yidong <[email protected]>2009-03-01 19:22:22 +0000
commitf13f18d9f50018775e287d6ecc7e7d855b0d98a3 (patch)
treed1136407a108b4f13b95d257c0b2814a6a783de6
parentb597e547374c917e2193db79de61b5368106bd8f (diff)
(clear-abbrev-table): Always return nil (Bug#2515).
-rw-r--r--lisp/abbrev.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/abbrev.el b/lisp/abbrev.el
index 0e8b2cf9e8..5b4ffe3ae8 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.