* [PATCH] `menu-bar-open' support for Windows console.
@ 2008-06-10 1:53 Óscar Fuentes
0 siblings, 0 replies; only message in thread
From: Óscar Fuentes @ 2008-06-10 1:53 UTC (permalink / raw)
To: emacs-devel
2008-06-10 Oscar Fuentes <ofv@wanadoo.es>
* term/w32-win.el (menu-bar-open): Call tmm-menubar when on a
console or when menu-bar-mode is nil.
Index: term/w32-win.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/term/w32-win.el,v
retrieving revision 1.99
diff -u -r1.99 w32-win.el
--- term/w32-win.el 10 May 2008 17:34:32 -0000 1.99
+++ term/w32-win.el 10 Jun 2008 01:25:06 -0000
@@ -383,8 +383,6 @@
\f
;;;; Function keys
- ;;; make f10 activate the real menubar rather than the mini-buffer menu
- ;;; navigation feature.
(defun menu-bar-open (&optional frame)
"Start key navigation of the menu bar in FRAME.
@@ -392,9 +390,13 @@
with the arrow keys, select a menu entry with the Return key or cancel with
the Escape key. If FRAME has no menu bar, this function does nothing.
- If FRAME is nil or not given, use the selected frame."
+ If FRAME is nil or not given, use the selected frame.
+
+ If `window-system' or `menu-bar-mode' are nil, call `tmm-menubar'."
(interactive "i")
- (w32-send-sys-command ?\xf100 frame))
+ (if (and window-system menu-bar-mode)
+ (w32-send-sys-command ?\xf100 frame)
+ (tmm-menubar)))
\f
;; W32 systems have different fonts than commonly found on X, so
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2008-06-10 1:53 UTC | newest]
Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2008-06-10 1:53 [PATCH] `menu-bar-open' support for Windows console Óscar Fuentes
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.