procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(easy-menu-add): Do call x-popup-menu, but only if it's defined.

Browse source
This commit is contained in:
Richard M. Stallman 2004-04-21 19:14:49 +00:00
parent dc0485c4f8
commit 67d170f2d2
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/easymenu.el
View file

@ -478,8 +478,8 @@ Do it only if `easy-menu-precalculate-equivalent-keybindings' is on."
(when easy-menu-precalculate-equivalent-keybindings
(if (and (symbolp menu) (not (keymapp menu)) (boundp menu))
(setq menu (symbol-value menu)))
;; x-popup-menu does not exist on tty-only Emacs.
;; (if (keymapp menu) (x-popup-menu nil menu))
(and (keymapp menu) (fboundp 'x-popup-menu)
(x-popup-menu nil menu))
))
(defun add-submenu (menu-path submenu &optional before in-menu)