diff options
Diffstat (limited to 'src/frame.c')
| -rw-r--r-- | src/frame.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/src/frame.c b/src/frame.c index 9668ea4d831..bf2b180f2d3 100644 --- a/src/frame.c +++ b/src/frame.c | |||
| @@ -3167,16 +3167,14 @@ x_set_font (struct frame *f, Lisp_Object arg, Lisp_Object oldval) | |||
| 3167 | fontset = fs_query_fontset (arg, 0); | 3167 | fontset = fs_query_fontset (arg, 0); |
| 3168 | if (fontset < 0) | 3168 | if (fontset < 0) |
| 3169 | { | 3169 | { |
| 3170 | font_object = font_open_by_name (f, SSDATA (arg), SBYTES (arg)); | 3170 | font_object = font_open_by_name (f, arg); |
| 3171 | if (NILP (font_object)) | 3171 | if (NILP (font_object)) |
| 3172 | error ("Font `%s' is not defined", SSDATA (arg)); | 3172 | error ("Font `%s' is not defined", SSDATA (arg)); |
| 3173 | arg = AREF (font_object, FONT_NAME_INDEX); | 3173 | arg = AREF (font_object, FONT_NAME_INDEX); |
| 3174 | } | 3174 | } |
| 3175 | else if (fontset > 0) | 3175 | else if (fontset > 0) |
| 3176 | { | 3176 | { |
| 3177 | Lisp_Object ascii_font = fontset_ascii (fontset); | 3177 | font_object = font_open_by_name (f, fontset_ascii (fontset)); |
| 3178 | |||
| 3179 | font_object = font_open_by_name (f, SSDATA (ascii_font), SBYTES (ascii_font)); | ||
| 3180 | if (NILP (font_object)) | 3178 | if (NILP (font_object)) |
| 3181 | error ("Font `%s' is not defined", SDATA (arg)); | 3179 | error ("Font `%s' is not defined", SDATA (arg)); |
| 3182 | arg = AREF (font_object, FONT_NAME_INDEX); | 3180 | arg = AREF (font_object, FONT_NAME_INDEX); |