1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00

(define-derived-mode): Properly ignore unknown args.

This commit is contained in:
Stefan Monnier 2002-09-13 16:22:04 +00:00
parent 82dc968ca9
commit 12a1174598
2 changed files with 14 additions and 4 deletions

View File

@ -1,10 +1,20 @@
2002-09-13 Stefan Monnier <monnier@cs.yale.edu>
* derived.el (define-derived-mode): Properly ignore unknown args.
* emacs-lisp/easy-mmode.el (define-minor-mode): Add a :require arg.
Don't call the function during init if mode is on by default.
* simple.el: Provide `simple'.
(transient-mark-mode, line-number-mode, column-number-mode):
Pass an explicit `:require nil' argument.
2002-09-13 Francesco Potorti` <pot@gnu.org>
* play/tetris.el (tetris-blank-options, tetris-cell-options):
Remove various redundant `(t nil)'.
* play/snake.el (snake-border-options): Use color on tty if
available.
* play/snake.el (snake-border-options): Use color on tty if available.
* play/tetris.el (tetris-border-options): Likewise.

View File

@ -178,8 +178,8 @@ been generated automatically, with a reference to the keymap."
(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))