# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1056801249 0
# Node ID 64b052fa52ff044f93a845f89a58f18574521166
# Parent  17c015f1f7950279bf0c995017df2d94fb26973f
(menu-bar-options-menu): Move mouse-set-fonts item here.

diff -r 17c015f1f795 -r 64b052fa52ff lisp/menu-bar.el
--- a/lisp/menu-bar.el	Fri Jun 27 22:54:26 2003 +0000
+++ b/lisp/menu-bar.el	Sat Jun 28 11:54:09 2003 +0000
@@ -654,6 +654,11 @@
 (define-key menu-bar-options-menu [custom-separator]
   '("--"))
 
+(define-key menu-bar-options-menu [mouse-set-font]
+  '(menu-item "Set Font/Fontset" mouse-set-font
+	       :visible (display-multi-font-p)
+	       :help "Select a font from list of known fonts/fontsets"))
+
 ;; The "Show/Hide" submenu of menu "Options"
 
 (defvar menu-bar-showhide-menu (make-sparse-keymap "Show/Hide"))