]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix 'C-h k' for "Paste from Kill Menu" in context menus
authorEli Zaretskii <eliz@gnu.org>
Sat, 8 Apr 2023 17:10:49 +0000 (20:10 +0300)
committerEli Zaretskii <eliz@gnu.org>
Sat, 8 Apr 2023 17:10:49 +0000 (20:10 +0300)
* lisp/mouse.el (context-menu-region): Make the entries be
symbols, not just integers, to prevent "C-h c" from interpreting
them as character keys.  (Bug#62626)

lisp/mouse.el

index d93594deb042069eeab74f7712471d49efea7513..60542e47448dc457fc217e9f0d85375a9af0c7a5 100644 (file)
@@ -524,7 +524,8 @@ Some context functions add menu items below the separator."
           (i 0))
       (dolist (item (reverse yank-menu))
         (when (consp item)
-          (define-key submenu (vector (setq i (1+ i)))
+          (define-key submenu
+            (vector (intern (format "kill-%d" (setq i (1+ i)))))
             `(menu-item ,(cadr item)
                         ,(lambda () (interactive)
                            (mouse-yank-from-menu click (car item)))))))