master 788932d: Add test for Bug#51527

[Stefan Kangas]

branch: master
commit 788932d9e4c015d1f3b1384a310f6001223d6e9b
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Add test for Bug#51527
    
    * test/src/keymap-tests.el (keymap-lookup-key/menu-non-symbol):
    New test.
---
 test/src/keymap-tests.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/test/src/keymap-tests.el b/test/src/keymap-tests.el
index fc4dce0..d3cb1a6 100644
--- a/test/src/keymap-tests.el
+++ b/test/src/keymap-tests.el
@@ -146,6 +146,12 @@
     (should (eq (lookup-key map [menu-bar γ bar]) 'baz))
     (should (eq (lookup-key map [menu-bar Γ Bar]) 'baz))))
 
+(ert-deftest keymap-lookup-key/menu-non-symbol ()
+  "Test for Bug#51527."
+  (let ((map (make-keymap)))
+    (define-key map [menu-bar buffer 1] 'foo)
+    (should (eq (lookup-key map [menu-bar buffer 1]) 'foo))))
+
 (ert-deftest keymap-lookup-keymap/with-spaces ()
   "Backwards compatibility behaviour (Bug#50752)."
   (let ((map (make-keymap)))