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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 08304facfafa67a0bbd9330bd473fc18e1715e51..9f850eeb3ab761a25f344c7d0990414402315551 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2006-05-29  Jan Dj\e,Ad\e(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 4fb6781b615a5fcc176c1b538bf180af1267a9a5..ab16bb7dfaf41baa870ef9dfbf90fd0df1d3594c 100644 (file)
--- 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