5667 |
char * fontname; |
char * fontname; |
5668 |
char * pattern; |
char * pattern; |
5669 |
{ |
{ |
5670 |
char *regex = alloca (strlen (pattern) * 2 + 3); |
char *font_name_copy; |
|
char *font_name_copy = alloca (strlen (fontname) + 1); |
|
5671 |
char *ptr; |
char *ptr; |
5672 |
|
Lisp_Object encoded_font_name; |
5673 |
|
char *regex = alloca (strlen (pattern) * 2 + 3); |
5674 |
|
|
5675 |
/* Copy fontname so we can modify it during comparison. */ |
/* Convert fontname to unibyte for match. */ |
5676 |
strcpy (font_name_copy, fontname); |
encoded_font_name = string_make_unibyte (build_string (fontname)); |
5677 |
|
font_name_copy = SDATA (encoded_font_name); |
5678 |
|
|
5679 |
ptr = regex; |
ptr = regex; |
5680 |
*ptr++ = '^'; |
*ptr++ = '^'; |