comparison src/fontset.c @ 49286:fc85fba774da

(syms_of_fontset): Setup Vfont_encoding_alist here.
author Kenichi Handa <handa@m17n.org>
date Fri, 17 Jan 2003 08:10:00 +0000
parents 8a4e82b00f6f
children 3bdee1887901 d7ddb3e565de
comparison
equal deleted inserted replaced
49285:7ec1335b6d36 49286:fc85fba774da
1434 0: code points 0x20..0x7F or 0x2020..0x7F7F are used, 1434 0: code points 0x20..0x7F or 0x2020..0x7F7F are used,
1435 1: code points 0xA0..0xFF or 0xA0A0..0xFFFF are used, 1435 1: code points 0xA0..0xFF or 0xA0A0..0xFFFF are used,
1436 2: code points 0x20A0..0x7FFF are used, 1436 2: code points 0x20A0..0x7FFF are used,
1437 3: code points 0xA020..0xFF7F are used. */); 1437 3: code points 0xA020..0xFF7F are used. */);
1438 Vfont_encoding_alist = Qnil; 1438 Vfont_encoding_alist = Qnil;
1439 Vfont_encoding_alist
1440 = Fcons (Fcons (build_string ("JISX0201"),
1441 Fcons (Fcons (intern ("latin-jisx0201"), make_number (0)),
1442 Qnil)),
1443 Vfont_encoding_alist);
1444 Vfont_encoding_alist
1445 = Fcons (Fcons (build_string ("ISO8859-1"),
1446 Fcons (Fcons (intern ("ascii"), make_number (0)),
1447 Qnil)),
1448 Vfont_encoding_alist);
1439 1449
1440 DEFVAR_LISP ("use-default-ascent", &Vuse_default_ascent, 1450 DEFVAR_LISP ("use-default-ascent", &Vuse_default_ascent,
1441 doc: /* Char table of characters whose ascent values should be ignored. 1451 doc: /* Char table of characters whose ascent values should be ignored.
1442 If an entry for a character is non-nil, the ascent value of the glyph 1452 If an entry for a character is non-nil, the ascent value of the glyph
1443 is assumed to be what specified by _MULE_DEFAULT_ASCENT property of a font. 1453 is assumed to be what specified by _MULE_DEFAULT_ASCENT property of a font.