]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix `C-h k' in gnus-article-mode (don't merge)
authorLars Ingebrigtsen <larsi@gnus.org>
Sun, 14 Nov 2021 01:46:38 +0000 (02:46 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Sun, 14 Nov 2021 17:49:22 +0000 (18:49 +0100)
* lisp/gnus/gnus-art.el (gnus-article-describe-key):
(gnus-article-describe-key-briefly): Fix `describe-key' calling
convention (bug#51796).

lisp/gnus/gnus-art.el

index cce0fc32b707c35e487c2684a8366a10e1a69480..b97cd711c4ea845fa5c5389f5c06221d98e90baa 100644 (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)))