* term/x-win.el: bind F10 to menu-bar-start if available.

2 files changed, 8 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 08304facfaf..9f850eeb3ab 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2006-05-29  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>
+
+        * term/x-win.el: bind F10 to menu-bar-start if available.
+
 2006-05-28  Dan Nicolaescu  <dann@ics.uci.edu>
 
         * term.el (term-if-xemacs, term-ifnot-xemacs): Delete, replace
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 4fb6781b615..ab16bb7dfaf 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -2516,5 +2516,9 @@ order until succeed.")
 (add-hook 'after-make-frame-functions 'x-dnd-init-frame)
 (global-set-key [drag-n-drop] 'x-dnd-handle-drag-n-drop-event)
 
+;; Let F10 do menu bar navigation.
+(and (fboundp 'menu-bar-start)
+     (global-set-key [f10] 'menu-bar-start))
+
 ;; arch-tag: f1501302-db8b-4d95-88e3-116697d89f78
 ;;; x-win.el ends here