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.
This commit is contained in:
Stephen Gildea 2021-10-12 18:29:30 -07:00
parent bcb43fbc95
commit dec613d1e7
2 changed files with 3 additions and 4 deletions

View file

@ -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

View file

@ -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