Mercurial > hg > xemacs-beta

comparison lisp/x11/x-font-menu.el @ 10:49a24b4fd526 r19-15b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b6
author cvs
date Mon, 13 Aug 2007 08:47:52 +0200
parents b82b59fe008d
children 56c54cf7c5b6
comparison
equal deleted inserted replaced
9:6f2bbbbbe05a 10:49a24b4fd526
115 ;;;###autoload 115 ;;;###autoload
116 (defvar font-menu-ignore-scaled-fonts t 116 (defvar font-menu-ignore-scaled-fonts t
117 "*If non-nil, then the font menu will try to show only bitmap fonts.") 117 "*If non-nil, then the font menu will try to show only bitmap fonts.")
118 118
119 ;;;###autoload 119 ;;;###autoload
120 (defvar font-menu-this-frame-only-p t 120 (defvar font-menu-this-frame-only-p nil
121 "*If non-nil, then changing the default font from the font menu will only 121 "*If non-nil, then changing the default font from the font menu will only
122 affect one frame instead of all frames.") 122 affect one frame instead of all frames.")
123 123
124 ;; only call XListFonts (and parse) once per device. 124 ;; only call XListFonts (and parse) once per device.
125 ;; ( (device . [parsed-list-fonts family-menu size-menu weight-menu]) ...) 125 ;; ( (device . [parsed-list-fonts family-menu size-menu weight-menu]) ...)