* lisp/abbrev.el (abbrev--check-chars): Fix thinko.

Fixes: debbugs:15329

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eec861a1dcd021c675c75a2b0473569374d2c2a4..1ea13a9a0be05e89f0d302ebce2e16703c64ac01 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-09-12  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * abbrev.el (abbrev--check-chars): Fix thinko (bug#15329).
+
 2013-08-23  Glenn Morris  <rgm@gnu.org>
 
        * emacs-lisp/package.el (package-buffer-info): Fix message typo.

diff --git a/lisp/abbrev.el b/lisp/abbrev.el
index bd09653103f07a662c16077b2850617f2e7e4c5e..1fe5c0c4786b7a32cb0868485af4a5bd49d0c300 100644 (file)
--- a/lisp/abbrev.el
+++ b/lisp/abbrev.el
@@ -615,9 +615,9 @@ An obsolete but still supported calling form is:
   "Check if the characters in ABBREV have word syntax in either the
 current (if global is nil) or standard syntax table."
   (with-syntax-table
-      (cond ((null global) (standard-syntax-table))
+      (cond ((null global) (syntax-table))
             ;; ((syntax-table-p global) global)
-            (t (syntax-table)))
+            (t (standard-syntax-table)))
     (when (string-match "\\W" abbrev)
       (let ((badchars ())
             (pos 0))