Commit 45c2639b authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(make-lucid-menu-keymap): Add menu-alias property.

parent 41311853
......@@ -81,6 +81,7 @@
(if (symbolp callback)
(fset command callback)
(fset command (list 'lambda () '(interactive) callback)))
(put command 'menu-alias t)
(let ((i 2))
(while (< i (length item))
(cond
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment