From 356d2ee4664f65562125a2414d8149ce7fb01321 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Kai=20Gro=C3=9Fjohann?= Date: Fri, 27 Jun 2003 20:19:21 +0000 Subject: [PATCH] (menu-bar-options-menu): Move `mouse-set-fonts' here from Options/Mule submenu. --- lisp/ChangeLog | 5 +++++ lisp/international/mule-cmds.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4f991559d8d..05ef1bb9280 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-06-27 Kai Gro,A_(Bjohann + + * international/mule-cmds.el (menu-bar-options-menu): Move + `mouse-set-fonts' here from Options/Mule submenu. + 2003-06-26 Stephen Eglen * iswitchb.el (iswitchb-read-buffer): Remove redudant variable diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 54fce2300a6..b2306a954dc 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -64,7 +64,7 @@ (define-key-after mule-menu-keymap [set-language-environment] (list 'menu-item "Set Language Environment" setup-language-environment-map :help "Multilingual environment suitable for a specific language")) -(define-key-after mule-menu-keymap [mouse-set-font] +(define-key-after menu-bar-options-menu [mouse-set-font] '(menu-item "Set Font/Fontset" mouse-set-font :visible (fboundp 'generate-fontset-menu) :help "Select a font from list of known fonts/fontsets")) -- 2.39.2