Parent Directory | Revision Log | Patch
revision 1.69 by raeburn, Mon Jul 15 00:00:36 2002 UTC | revision 1.70 by raeburn, Tue Jul 16 16:35:27 2002 UTC | |
---|---|---|
# | Line 1013 name of a font, REGISTRY is a registry n | Line 1013 name of a font, REGISTRY is a registry n |
1013 | { | { |
1014 | elt = Fget (character, Qcharset); | elt = Fget (character, Qcharset); |
1015 | if (!VECTORP (elt) || ASIZE (elt) < 1 || !NATNUMP (AREF (elt, 0))) | if (!VECTORP (elt) || ASIZE (elt) < 1 || !NATNUMP (AREF (elt, 0))) |
1016 | error ("Invalid charset: %s", (XSTRING (SYMBOL_NAME (character)))->data); | error ("Invalid charset: %s", SDATA (SYMBOL_NAME (character))); |
1017 | from = MAKE_CHAR (XINT (AREF (elt, 0)), 0, 0); | from = MAKE_CHAR (XINT (AREF (elt, 0)), 0, 0); |
1018 | to = from; | to = from; |
1019 | } | } |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |