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 b2cd2064da2..9445cf9675c 100644 --- a/lisp/abbrev.el +++ b/lisp/abbrev.el @@ -935,7 +935,8 @@ Properties with special meaning: (unless table (setq table (make-abbrev-table)) (set tablename table) - (push tablename abbrev-table-name-list)) + (unless (memq tablename abbrev-table-name-list) + (push tablename abbrev-table-name-list))) ;; We used to just pass them to `make-abbrev-table', but that fails ;; if the table was pre-existing as is the case if it was created by ;; loading the user's abbrev file. |