Mercurial > emacs
changeset 47465:8ba8d2d4ead4
(define-derived-mode): Properly ignore unknown args.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 13 Sep 2002 16:20:01 +0000 |
| parents | b8282a873821 |
| children | 4e6b6d281dd1 |
| files | lisp/derived.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/derived.el Fri Sep 13 14:21:45 2002 +0000 +++ b/lisp/derived.el Fri Sep 13 16:20:01 2002 +0000 @@ -178,8 +178,8 @@ (case (pop body) (:group (setq group (pop body))) (:abbrev-table (setq abbrev (pop body)) (setq declare-abbrev nil)) - (:syntax-table (setq syntax (pop body)) (setq declare-syntax nil)))) - + (:syntax-table (setq syntax (pop body)) (setq declare-syntax nil)) + (t (pop body)))) (setq docstring (derived-mode-make-docstring parent child docstring syntax abbrev))