* w32font.c (intern_font_name): New function.

(add_font_name_to_list, w32_enumfont_pattern_entity): Use it.
(w32font_open_internal, Fx_select_font): Decode font name.
(fill_in_logfont, list_all_matching_fonts): Encode font name.

* w32font.h (intern_font_name): Declare new function.

* w32uniscribe.c (add_opentype_font_name_to_list):
Use intern_font_name.

1 files changed, 2 insertions, 0 deletions

diff --git a/src/w32font.h b/src/w32font.h
index 748b329f8da..180a5b873ba 100644
--- a/src/w32font.h
+++ b/src/w32font.h
@@ -81,6 +81,8 @@ int w32font_draw P_ ((struct glyph_string *s, int from, int to,
 
 int uniscribe_check_otf P_ ((LOGFONT *font, Lisp_Object otf_spec));
 
+Lisp_Object intern_font_name P_ ((char *));
+
 #endif
 
 /* arch-tag: ef9d9675-a2a5-4d01-9526-815e9a3da7cb