Re: Make font menu available in menu bar

[Kevin Rodgers <ihs_4664@yahoo.com>]

Kai Großjohann wrote:

> Richard Stallman <rms@gnu.org> 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"))

Why not move the whole (define-key-after ...) form to lisp/menu-bar.el, with

all the other references to menu-bar-options-menu?

-- 
<a href="mailto:&lt;kevin.rodgers&#64;ihs.com&gt;">Kevin Rodgers</a>