summaryrefslogtreecommitdiff
path: root/src/w32font.c
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2015-02-21 14:54:08 +0200
committerEli Zaretskii <eliz@gnu.org>2015-02-21 14:54:08 +0200
commit9074a684990600abd9dfad0477c7cd1d2f339ed3 (patch)
tree1a2a8c2b23be68ecf7959031b191c2de20a2d018 /src/w32font.c
parenta2e6668dee271ef76bede2c9556439df67999fda (diff)
downloademacs-9074a684990600abd9dfad0477c7cd1d2f339ed3.tar.gz
Prefer 'Qfoo' to 'intern ("foo")' in w32 source files
src/w32term.c (queue_notifications): src/w32inevt.c (handle_file_notifications): src/w32font.c (w32_enumfont_pattern_entity): Prefer 'Qfoo' to 'intern ("foo")'.
Diffstat (limited to 'src/w32font.c')
-rw-r--r--src/w32font.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/w32font.c b/src/w32font.c
index 360ad3f1c48..422f082e72b 100644
--- a/src/w32font.c
+++ b/src/w32font.c
@@ -1072,11 +1072,11 @@ w32_enumfont_pattern_entity (Lisp_Object frame,
truetype so that this information is not any worse than we could
have obtained later. */
if (EQ (backend, Quniscribe) && (full_type & NTMFLAGS_OPENTYPE))
- tem = intern ("opentype");
+ tem = Qopentype;
else if (font_type & TRUETYPE_FONTTYPE)
tem = intern ("truetype");
else if (full_type & NTM_PS_OPENTYPE)
- tem = intern ("postscript");
+ tem = Qpostscript;
else if (full_type & NTM_TYPE1)
tem = intern ("type1");
else if (font_type & RASTER_FONTTYPE)
@@ -1875,10 +1875,10 @@ static Lisp_Object
w32_to_fc_weight (int n)
{
if (n >= FW_EXTRABOLD) return intern ("black");
- if (n >= FW_BOLD) return intern ("bold");
+ if (n >= FW_BOLD) return Qbold;
if (n >= FW_SEMIBOLD) return intern ("demibold");
if (n >= FW_NORMAL) return intern ("medium");
- return intern ("light");
+ return Qlight;
}
/* Fill in all the available details of LOGFONT from FONT_SPEC. */