diff options
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 3d0a843e375..f8c82238a31 100644 --- a/lisp/abbrev.el +++ b/lisp/abbrev.el @@ -648,7 +648,8 @@ either a single abbrev table or a list of abbrev tables." ;; to treat the distinction between a single table and a list of tables. (cond ((consp tables) tables) - ((vectorp tables) (list tables)) + ((abbrev-table-p tables) (list tables)) + (tables (signal 'wrong-type-argument (list 'abbrev-table-p tables))) (t (let ((tables (if (listp local-abbrev-table) (append local-abbrev-table |