Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
1ada3dab
Commit
1ada3dab
authored
Jul 25, 2008
by
Jason Rumney
Browse files
(Fx_select_font): Reverse sense of second arg.
parent
2bbcd618
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
9 additions
and
5 deletions
+9
-5
src/ChangeLog
src/ChangeLog
+4
-0
src/w32font.c
src/w32font.c
+5
-5
No files found.
src/ChangeLog
View file @
1ada3dab
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>
* syntax.c (struct lisp_parse_state, char_quoted, inc_bytepos)
...
...
src/w32font.c
View file @
1ada3dab
...
...
@@ -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.
If FRAME is omitted or nil, it defaults to the selected frame.
If
IN
CLUDE-PROPORTIONAL is non-nil,
in
clude proportional fonts
If
EX
CLUDE-PROPORTIONAL is non-nil,
ex
clude proportional fonts
in the font selection dialog. */
)
(
frame
,
in
clude_proportional
)
Lisp_Object
frame
,
in
clude_proportional
;
(
frame
,
ex
clude_proportional
)
Lisp_Object
frame
,
ex
clude_proportional
;
{
FRAME_PTR
f
=
check_x_frame
(
frame
);
CHOOSEFONT
cf
;
...
...
@@ -2348,9 +2348,9 @@ in the font selection dialog. */)
cf
.
hwndOwner
=
FRAME_W32_WINDOW
(
f
);
cf
.
Flags
=
CF_FORCEFONTEXIST
|
CF_SCREENFONTS
|
CF_NOVERTFONTS
;
/*
Unless in
clude_proportional is non-nil, limit the selection to
/*
If ex
clude_proportional is non-nil, limit the selection to
monospaced fonts. */
if
(
NILP
(
in
clude_proportional
))
if
(
!
NILP
(
ex
clude_proportional
))
cf
.
Flags
|=
CF_FIXEDPITCHONLY
;
cf
.
lpLogFont
=
&
lf
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment