diff options
| author | Stephen Gildea <stepheng+emacs@gildea.com> | 2021-10-12 18:29:30 -0700 |
|---|---|---|
| committer | Stephen Gildea <stepheng+emacs@gildea.com> | 2021-10-12 18:29:30 -0700 |
| commit | dec613d1e727b94fc3b672134d3a75063bd6b618 (patch) | |
| tree | bfef34b6d5488eb3c0492e2b5daf42a0b83c46cf /lisp | |
| parent | bcb43fbc95ad0c635c8f19c391ec90d3f8a74035 (diff) | |
| download | emacs-dec613d1e727b94fc3b672134d3a75063bd6b618.tar.gz emacs-dec613d1e727b94fc3b672134d3a75063bd6b618.tar.bz2 emacs-dec613d1e727b94fc3b672134d3a75063bd6b618.zip | |
MH-E: restore message about obsolete key binding
* lisp/mh-e/mh-show.el:
* lisp/mh-e/mh-folder.el: Restore "obsolete key" message for "J w" that
was lost in the conversion from gnus-define-keys to define-keymap.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mh-e/mh-folder.el | 2 | ||||
| -rw-r--r-- | lisp/mh-e/mh-show.el | 5 |
2 files changed, 3 insertions, 4 deletions
diff --git a/lisp/mh-e/mh-folder.el b/lisp/mh-e/mh-folder.el index c423d22e892..e6c295764b7 100644 --- a/lisp/mh-e/mh-folder.el +++ b/lisp/mh-e/mh-folder.el @@ -278,7 +278,7 @@ annotation.") "?" #'mh-prefix-help "a" #'mh-junk-allowlist "b" #'mh-junk-blocklist - "w" #'mh-junk-allowlist) + "w" #'mh-junk-whitelist) "P" (define-keymap :prefix 'mh-ps-print-map "?" #'mh-prefix-help diff --git a/lisp/mh-e/mh-show.el b/lisp/mh-e/mh-show.el index 4b98d6c4879..524179648dc 100644 --- a/lisp/mh-e/mh-show.el +++ b/lisp/mh-e/mh-show.el @@ -462,8 +462,7 @@ still visible.\n") (mh-defun-show-buffer mh-show-toggle-tick mh-toggle-tick) (mh-defun-show-buffer mh-show-narrow-to-tick mh-narrow-to-tick) (mh-defun-show-buffer mh-show-junk-allowlist mh-junk-allowlist) -(mh-defun-show-buffer mh-show-junk-whitelist mh-junk-allowlist) -(make-obsolete 'mh-show-junk-whitelist 'mh-show-junk-allowlist "28.1") +(mh-defun-show-buffer mh-show-junk-whitelist mh-junk-whitelist) (mh-defun-show-buffer mh-show-junk-blocklist mh-junk-blocklist) (mh-defun-show-buffer mh-show-index-new-messages mh-index-new-messages) (mh-defun-show-buffer mh-show-index-ticked-messages mh-index-ticked-messages) @@ -635,7 +634,7 @@ still visible.\n") "?" #'mh-prefix-help "a" #'mh-show-junk-allowlist "b" #'mh-show-junk-blocklist - "w" #'mh-show-junk-allowlist) + "w" #'mh-show-junk-whitelist) "P" (define-keymap :prefix 'mh-show-ps-print-map "?" #'mh-prefix-help |