diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-09-02 14:58:30 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-09-02 14:58:30 +0200 |
| commit | 965ebf3484bf8ec39d0ee34f4040071fe3e5e04a (patch) | |
| tree | 04bb5774659d9004d63e41c0a6f20a2df430b2b7 | |
| parent | 99bf269ca035aeb99116a075d5bd42cf6dc1feb1 (diff) | |
| download | emacs-965ebf3484bf8ec39d0ee34f4040071fe3e5e04a.tar.gz | |
Fix define-minor-mode :keymap obsoletion warning
* lisp/emacs-lisp/easy-mmode.el (define-minor-mode): Fix some
warning.
| -rw-r--r-- | lisp/emacs-lisp/easy-mmode.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index a1398bd12e7..7d54a84687b 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el @@ -419,7 +419,10 @@ No problems result if this variable is not bound. (cond ((keymapp m) m) ;; FIXME: `easy-mmode-define-keymap' is obsolete, ;; so this form should also be obsolete somehow. - ((listp m) (easy-mmode-define-keymap m)) + ((listp m) + (with-suppressed-warnings ((obsolete + easy-mmode-define-keymap)) + (easy-mmode-define-keymap m))) (t (error "Invalid keymap %S" m)))) ,(format "Keymap for `%s'." mode-name))) |