(easy-menu-create-keymaps): Set menu-enable prop.

1995-05-17 19:34:18 +00:00
parent a53c766630
commit 0579e89d98
1 changed files with 2 additions and 1 deletions
--- a/lisp/emacs-lisp/easymenu.el
+++ b/lisp/emacs-lisp/easymenu.el
@@ -164,7 +164,8 @@ is a list of menu items, as above."
 			      selected
 			      ;; Simulate radio buttons with menu-enable.
 			      (put command 'menu-enable
-				   (list 'not selected)))))))	       
+				   (list 'not selected)))))	       
+		   (put command 'menu-enable keyword)))
 	       (if (keymapp callback)
 		   (setq name (concat name " ...")))
 	       (if (symbolp callback)