mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-11 14:01:43 -08:00
Code Issues Projects Releases Wiki Activity

Fix `C-h k' in gnus-article-mode (don't merge)

Browse source 
* lisp/gnus/gnus-art.el (gnus-article-describe-key):
(gnus-article-describe-key-briefly): Fix `describe-key' calling
convention (bug#51796).
This commit is contained in:
Lars Ingebrigtsen 2021-11-14 02:46:38 +01:00
parent 85ac0efe7c
commit 97059bcdff
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/gnus/gnus-art.el
View file

@ -6867,8 +6867,8 @@ KEY is a string or a vector."
unread-command-events))
(let ((cursor-in-echo-area t)
gnus-pick-mode)
(describe-key (cons (read-key-sequence nil t)
(this-single-command-raw-keys))
(describe-key (list (cons (read-key-sequence nil t)
(this-single-command-raw-keys)))
(current-buffer))))
(describe-key key)))
@ -6892,8 +6892,8 @@ KEY is a string or a vector."
unread-command-events))
(let ((cursor-in-echo-area t)
gnus-pick-mode)
(describe-key-briefly (cons (read-key-sequence nil t)
(this-single-command-raw-keys))
(describe-key-briefly (list (cons (read-key-sequence nil t)
(this-single-command-raw-keys)))
insert (current-buffer))))
(describe-key-briefly key insert)))