comparison lisp/international/mule-cmds.el @ 51682:f4620c9305c7

(menu-bar-options-menu): Move `mouse-set-fonts' here from Options/Mule submenu.
author Kai Großjohann <kgrossjo@eu.uu.net>
date Fri, 27 Jun 2003 20:19:21 +0000
parents ecc1259fadfc
children a5090ef2f76b
comparison
equal deleted inserted replaced
51681:0a1f20d3fa89 51682:f4620c9305c7
62 (make-sparse-keymap "Set Coding System")) 62 (make-sparse-keymap "Set Coding System"))
63 63
64 (define-key-after mule-menu-keymap [set-language-environment] 64 (define-key-after mule-menu-keymap [set-language-environment]
65 (list 'menu-item "Set Language Environment" setup-language-environment-map 65 (list 'menu-item "Set Language Environment" setup-language-environment-map
66 :help "Multilingual environment suitable for a specific language")) 66 :help "Multilingual environment suitable for a specific language"))
67 (define-key-after mule-menu-keymap [mouse-set-font] 67 (define-key-after menu-bar-options-menu [mouse-set-font]
68 '(menu-item "Set Font/Fontset" mouse-set-font 68 '(menu-item "Set Font/Fontset" mouse-set-font
69 :visible (fboundp 'generate-fontset-menu) 69 :visible (fboundp 'generate-fontset-menu)
70 :help "Select a font from list of known fonts/fontsets")) 70 :help "Select a font from list of known fonts/fontsets"))
71 (define-key-after mule-menu-keymap [separator-mule] 71 (define-key-after mule-menu-keymap [separator-mule]
72 '("--") 72 '("--")