2176 |
font_name_registry (fontname) |
font_name_registry (fontname) |
2177 |
Lisp_Object fontname; |
Lisp_Object fontname; |
2178 |
{ |
{ |
|
Lisp_Object registry; |
|
2179 |
struct font_name font; |
struct font_name font; |
|
char *p; |
|
2180 |
|
|
2181 |
font.name = LSTRDUPA (fontname); |
font.name = LSTRDUPA (fontname); |
2182 |
if (! split_font_name (NULL, &font, 0)) |
if (! split_font_name (NULL, &font, 0)) |
6121 |
static int |
static int |
6122 |
try_font_list (f, pattern, family, registry, fonts) |
try_font_list (f, pattern, family, registry, fonts) |
6123 |
struct frame *f; |
struct frame *f; |
6124 |
Lisp_Object family, registry; |
Lisp_Object pattern, family, registry; |
6125 |
struct font_name **fonts; |
struct font_name **fonts; |
6126 |
{ |
{ |
6127 |
int nfonts = 0; |
int nfonts = 0; |
6194 |
Lisp_Object *attrs; |
Lisp_Object *attrs; |
6195 |
Lisp_Object font_spec; |
Lisp_Object font_spec; |
6196 |
{ |
{ |
|
Lisp_Object val; |
|
6197 |
Lisp_Object pattern, family, adstyle, registry; |
Lisp_Object pattern, family, adstyle, registry; |
|
Lisp_Object new_attrs[LFACE_VECTOR_SIZE]; |
|
6198 |
char *font_name = NULL; |
char *font_name = NULL; |
6199 |
struct font_name *fonts; |
struct font_name *fonts; |
6200 |
int nfonts; |
int nfonts; |