Mercurial > emacs

diff lisp/term/x-win.el @ 105004:782f60a5e57a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* term/x-win.el (x-menu-bar-open): Only call accelerate-menu if it is defined (Bug#4405).
author Chong Yidong <cyd@stupidchicken.com>
date Sun, 13 Sep 2009 21:32:58 +0000
parents 3727134fef6c
children b520d55cdd72
line wrap: on
line diff
--- a/lisp/term/x-win.el	Sun Sep 13 21:21:40 2009 +0000
+++ b/lisp/term/x-win.el	Sun Sep 13 21:32:58 2009 +0000
@@ -1445,7 +1445,9 @@
 (defun x-menu-bar-open (&optional frame)
   "Open the menu bar if `menu-bar-mode' is on. otherwise call `tmm-menubar'."
   (interactive "i")
-  (if menu-bar-mode (accelerate-menu frame)
+  (if (and menu-bar-mode
+	   (fboundp 'accelerate-menu))
+      (accelerate-menu frame)
     (tmm-menubar)))