Re: Make font menu available in menu bar

[Kai Großjohann]

Richard Stallman <address@hidden> writes:

> That seems plausible.  Ok, I will put it directly under Options.
> Having it under Mule does not make sense.

I've now done that.  I hope it was okay.

Index: lisp/international/mule-cmds.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/international/mule-cmds.el,v
retrieving revision 1.234
retrieving revision 1.235
diff -u -u -r1.234 -r1.235
--- lisp/international/mule-cmds.el     21 Jun 2003 02:26:58 -0000      1.234
+++ lisp/international/mule-cmds.el     27 Jun 2003 20:19:21 -0000      1.235
@@ -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"))


-- 
~/.signature