[Emacs-diffs] emacs/lisp abbrev.el

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      09/03/01 19:22:23

Modified files:
        lisp           : abbrev.el 

Log message:
        (clear-abbrev-table): Always return nil (Bug#2515).

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/abbrev.el?cvsroot=emacs&r1=1.78&r2=1.79

Patches:
Index: abbrev.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/abbrev.el,v
retrieving revision 1.78
retrieving revision 1.79
diff -u -b -r1.78 -r1.79
--- abbrev.el   5 Jan 2009 03:18:37 -0000       1.78
+++ abbrev.el   1 Mar 2009 19:22:22 -0000       1.79
@@ -521,7 +521,8 @@
       (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.