Commit 1ada3dab authored by Jason Rumney's avatar Jason Rumney
Browse files

(Fx_select_font): Reverse sense of second arg.

parent 2bbcd618
2008-07-25 Jason Rumney <jasonr@gnu.org>
* w32font.c (Fx_select_font): Reverse sense of second arg.
2008-07-24 Stefan Monnier <monnier@iro.umontreal.ca> 2008-07-24 Stefan Monnier <monnier@iro.umontreal.ca>
* syntax.c (struct lisp_parse_state, char_quoted, inc_bytepos) * syntax.c (struct lisp_parse_state, char_quoted, inc_bytepos)
......
...@@ -2328,10 +2328,10 @@ DEFUN ("x-select-font", Fx_select_font, Sx_select_font, 0, 2, 0, ...@@ -2328,10 +2328,10 @@ DEFUN ("x-select-font", Fx_select_font, Sx_select_font, 0, 2, 0,
Return fontconfig style font string corresponding to the selection. Return fontconfig style font string corresponding to the selection.
If FRAME is omitted or nil, it defaults to the selected frame. If FRAME is omitted or nil, it defaults to the selected frame.
If INCLUDE-PROPORTIONAL is non-nil, include proportional fonts If EXCLUDE-PROPORTIONAL is non-nil, exclude proportional fonts
in the font selection dialog. */) in the font selection dialog. */)
(frame, include_proportional) (frame, exclude_proportional)
Lisp_Object frame, include_proportional; Lisp_Object frame, exclude_proportional;
{ {
FRAME_PTR f = check_x_frame (frame); FRAME_PTR f = check_x_frame (frame);
CHOOSEFONT cf; CHOOSEFONT cf;
...@@ -2348,9 +2348,9 @@ in the font selection dialog. */) ...@@ -2348,9 +2348,9 @@ in the font selection dialog. */)
cf.hwndOwner = FRAME_W32_WINDOW (f); cf.hwndOwner = FRAME_W32_WINDOW (f);
cf.Flags = CF_FORCEFONTEXIST | CF_SCREENFONTS | CF_NOVERTFONTS; cf.Flags = CF_FORCEFONTEXIST | CF_SCREENFONTS | CF_NOVERTFONTS;
/* Unless include_proportional is non-nil, limit the selection to /* If exclude_proportional is non-nil, limit the selection to
monospaced fonts. */ monospaced fonts. */
if (NILP (include_proportional)) if (!NILP (exclude_proportional))
cf.Flags |= CF_FIXEDPITCHONLY; cf.Flags |= CF_FIXEDPITCHONLY;
cf.lpLogFont = &lf; cf.lpLogFont = &lf;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment