Variable: w32-use-w32-font-dialog
w32-use-w32-font-dialog is a customizable variable defined in
w32-vars.el.gz.
Value
t
Documentation
If non-nil, use the standard Windows font dialog for font selection.
If nil, pop up a menu of a fixed set of fonts including fontsets, like
X does. See w32-fixed-font-alist for the fonts to appear in the menu.
Setting this variable directly does not have any effect;
use either M-x customize (customize) or set mouse-appearance-menu-map to nil
after changing the value of this variable.
Source Code
;; Defined in /usr/src/emacs/lisp/w32-vars.el.gz
;; Redefine the font selection to use the standard W32 dialog
(defcustom w32-use-w32-font-dialog t
"If non-nil, use the standard Windows font dialog for font selection.
If nil, pop up a menu of a fixed set of fonts including fontsets, like
X does. See `w32-fixed-font-alist' for the fonts to appear in the menu.
Setting this variable directly does not have any effect;
use either \\[customize] or set `mouse-appearance-menu-map' to nil
after changing the value of this variable."
:type 'boolean
:set (lambda (symbol value)
(set symbol value)
(setq mouse-appearance-menu-map nil)))