Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 10:27:41 +00:00
Code Issues Projects Releases Packages Wiki Activity

(xlfd_charset_of_font): Don't overwrite fontname

Browse source 
argument.
(w32_codepage_for_font): Rename CP_INVALID to CP_UNKNOWN.
(w32_list_fonts): Don't choke if pattern doesn't specify a
codepage.
This commit is contained in:
Andrew Innes 2000-12-06 15:54:02 +00:00
parent d4b72d58bc
commit ceb1287747
1 changed files with 7 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
src/w32fns.c
View file

@ -5459,12 +5459,10 @@ char * xlfd_charset_of_font (char * fontname)
char *charset, *encoding;
encoding = strrchr(fontname, '-');
if (!encoding)
if (!encoding || encoding == fontname)
return NULL;
*encoding = 0;
charset = strrchr(fontname, '-');
*encoding = '-';
charset = strrchr(encoding - 1, '-');
if (!charset || strcmp(charset, "-*-*") == 0)
return NULL;
@ -6030,7 +6028,7 @@ w32_codepage_for_font (char *fontname)
charset = xlfd_charset_of_font (fontname);
if (!charset)
return CP_INVALID;
return CP_UNKNOWN;
charset_str = (char *) alloca (strlen (charset));
strcpy (charset_str, charset);
@ -6051,7 +6049,7 @@ w32_codepage_for_font (char *fontname)
entry = Fassoc (build_string(charset), Vw32_charset_info_alist);
if (NILP (entry))
return CP_INVALID;
return CP_UNKNOWN;
codepage = Fcdr (Fcdr (entry));
@ -6062,7 +6060,7 @@ w32_codepage_for_font (char *fontname)
else if (INTEGERP (codepage))
return XINT (codepage);
else
return CP_INVALID;
return CP_UNKNOWN;
}
@ -6705,7 +6703,8 @@ w32_list_fonts (FRAME_PTR f, Lisp_Object pattern, int size, int maxnames )
going to be able to output one of these anyway. */
codepage = w32_codepage_for_font (XSTRING (tpat)->data);
if (codepage != CP_8BIT && codepage != CP_UNICODE
&& codepage != CP_DEFAULT && !IsValidCodePage(codepage))
&& codepage != CP_DEFAULT && codepage != CP_UNKNOWN
&& !IsValidCodePage(codepage))
continue;
/* See if we cached the result for this particular query.