Mercurial > emacs
changeset 47427:8cdcbab66042
(define-derived-mode): When making new abbrev table,
don't try to copy the parent's abbrev table.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 12 Sep 2002 03:22:40 +0000 |
| parents | ec3123180ac5 |
| children | eb0020984860 |
| files | lisp/derived.el |
| diffstat | 1 files changed, 1 insertions(+), 11 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/derived.el Thu Sep 12 03:21:57 2002 +0000 +++ b/lisp/derived.el Thu Sep 12 03:22:40 2002 +0000 @@ -215,17 +215,7 @@ `(let ((parent (char-table-parent ,syntax))) (unless (and parent (not (eq parent (standard-syntax-table)))) - (set-char-table-parent ,syntax (syntax-table))))) - ,(when declare-abbrev - `(when local-abbrev-table - (mapatoms - (lambda (symbol) - (or (intern-soft (symbol-name symbol) ,abbrev) - (define-abbrev ,abbrev - (symbol-name symbol) - (symbol-value symbol) - (symbol-function symbol)))) - local-abbrev-table))))) + (set-char-table-parent ,syntax (syntax-table))))))) (use-local-map ,map) ,(when syntax `(set-syntax-table ,syntax))