(function)))
(defvar font-menu-preferred-resolution
- (make-specifier-and-init 'generic '((global
- ((gtk) . "*-*")
- ((x) . "*-*"))) t)
+ (make-specifier-and-init 'generic '((global
+ ((x) . "*-*"))) t)
"Preferred horizontal and vertical font menu resolution (e.g. \"75:75\").")
(defvar font-menu-size-scaling
(make-specifier-and-init 'integer '((global
- ((gtk) . 10)
- ((x) . 10))) t)
+ ((x) . 10))) t)
"Scale factor used in defining font sizes.")
;; only call XListFonts (and parse) once per device.
(from-size (aref font-data 2))
(from-weight (aref font-data 3))
(from-slant (aref font-data 4))
- (face-list-to-change (delq 'default (face-list)))
+ (face-list-to-change (delq 'default (face-list)))
new-default-face-font)
(unless from-family
(signal 'error '("couldn't parse font name for default face")))