Mercurial > hg > xemacs-beta

comparison src/mule-charset.c @ 4805:980575c76541

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Move the arabic-iso8859-6 character set back to C, otherwise X11 lookup fails. src/ChangeLog addition: 2010-01-07 Aidan Kehoe <kehoea@parhasard.net> * mule-charset.c: (syms_of_mule_charset, complex_vars_of_mule_charset): * lisp.h: Restore the creation of arabic-iso8859-6 in C, having it in Lisp isn't sufficient for X11 input to work. lisp/ChangeLog addition: 2010-01-07 Aidan Kehoe <kehoea@parhasard.net> * unicode.el (load-unicode-tables): * mule/mule-msw-init-late.el: * mule/mule-category.el (predefined-category-list): * mule/arabic.el: Move arabic-iso8859-6 back to C, it needs to be there, otherwise X11 character input lookup fails.
author Aidan Kehoe <kehoea@parhasard.net>
date Thu, 07 Jan 2010 15:52:10 +0000
parents 0c54de4c4b9d
children 41852ee5f1b0
comparison
equal deleted inserted replaced
4804:3be2c7c0ef4b 4805:980575c76541
45 Lisp_Object Vcharset_latin_iso8859_2; 45 Lisp_Object Vcharset_latin_iso8859_2;
46 Lisp_Object Vcharset_latin_iso8859_3; 46 Lisp_Object Vcharset_latin_iso8859_3;
47 Lisp_Object Vcharset_latin_iso8859_4; 47 Lisp_Object Vcharset_latin_iso8859_4;
48 Lisp_Object Vcharset_thai_tis620; 48 Lisp_Object Vcharset_thai_tis620;
49 Lisp_Object Vcharset_greek_iso8859_7; 49 Lisp_Object Vcharset_greek_iso8859_7;
50 Lisp_Object Vcharset_arabic_iso8859_6;
50 Lisp_Object Vcharset_hebrew_iso8859_8; 51 Lisp_Object Vcharset_hebrew_iso8859_8;
51 Lisp_Object Vcharset_katakana_jisx0201; 52 Lisp_Object Vcharset_katakana_jisx0201;
52 Lisp_Object Vcharset_latin_jisx0201; 53 Lisp_Object Vcharset_latin_jisx0201;
53 Lisp_Object Vcharset_cyrillic_iso8859_5; 54 Lisp_Object Vcharset_cyrillic_iso8859_5;
54 Lisp_Object Vcharset_latin_iso8859_9; 55 Lisp_Object Vcharset_latin_iso8859_9;
91 Qlatin_iso8859_2, 92 Qlatin_iso8859_2,
92 Qlatin_iso8859_3, 93 Qlatin_iso8859_3,
93 Qlatin_iso8859_4, 94 Qlatin_iso8859_4,
94 Qthai_tis620, 95 Qthai_tis620,
95 Qgreek_iso8859_7, 96 Qgreek_iso8859_7,
97 Qarabic_iso8859_6,
96 Qhebrew_iso8859_8, 98 Qhebrew_iso8859_8,
97 Qkatakana_jisx0201, 99 Qkatakana_jisx0201,
98 Qlatin_jisx0201, 100 Qlatin_jisx0201,
99 Qcyrillic_iso8859_5, 101 Qcyrillic_iso8859_5,
100 Qlatin_iso8859_9, 102 Qlatin_iso8859_9,
1103 DEFSYMBOL (Qlatin_iso8859_2); 1105 DEFSYMBOL (Qlatin_iso8859_2);
1104 DEFSYMBOL (Qlatin_iso8859_3); 1106 DEFSYMBOL (Qlatin_iso8859_3);
1105 DEFSYMBOL (Qlatin_iso8859_4); 1107 DEFSYMBOL (Qlatin_iso8859_4);
1106 DEFSYMBOL (Qthai_tis620); 1108 DEFSYMBOL (Qthai_tis620);
1107 DEFSYMBOL (Qgreek_iso8859_7); 1109 DEFSYMBOL (Qgreek_iso8859_7);
1110 DEFSYMBOL (Qarabic_iso8859_6);
1108 DEFSYMBOL (Qhebrew_iso8859_8); 1111 DEFSYMBOL (Qhebrew_iso8859_8);
1109 DEFSYMBOL (Qkatakana_jisx0201); 1112 DEFSYMBOL (Qkatakana_jisx0201);
1110 DEFSYMBOL (Qlatin_jisx0201); 1113 DEFSYMBOL (Qlatin_jisx0201);
1111 DEFSYMBOL (Qcyrillic_iso8859_5); 1114 DEFSYMBOL (Qcyrillic_iso8859_5);
1112 DEFSYMBOL (Qlatin_iso8859_9); 1115 DEFSYMBOL (Qlatin_iso8859_9);
1226 CHARSET_LEFT_TO_RIGHT, 1229 CHARSET_LEFT_TO_RIGHT,
1227 build_string ("ISO8859-7"), 1230 build_string ("ISO8859-7"),
1228 build_msg_string ("ISO8859-7 (Greek)"), 1231 build_msg_string ("ISO8859-7 (Greek)"),
1229 build_msg_string ("ISO8859-7 (Greek)"), 1232 build_msg_string ("ISO8859-7 (Greek)"),
1230 vector1(build_string("iso8859-7")), 0, 0); 1233 vector1(build_string("iso8859-7")), 0, 0);
1234 staticpro (&Vcharset_arabic_iso8859_6);
1235 Vcharset_arabic_iso8859_6 =
1236 make_charset (LEADING_BYTE_ARABIC_ISO8859_6, Qarabic_iso8859_6, 2,
1237 CHARSET_TYPE_96, 1, 1, 'G',
1238 CHARSET_RIGHT_TO_LEFT,
1239 build_string ("ISO8859-6"),
1240 build_msg_string ("ISO8859-6 (Arabic)"),
1241 build_msg_string ("ISO8859-6 (Arabic)"),
1242 vector1(build_string ("iso8859-6")), 0, 0);
1231 staticpro (&Vcharset_hebrew_iso8859_8); 1243 staticpro (&Vcharset_hebrew_iso8859_8);
1232 Vcharset_hebrew_iso8859_8 = 1244 Vcharset_hebrew_iso8859_8 =
1233 make_charset (LEADING_BYTE_HEBREW_ISO8859_8, Qhebrew_iso8859_8, 2, 1245 make_charset (LEADING_BYTE_HEBREW_ISO8859_8, Qhebrew_iso8859_8, 2,
1234 CHARSET_TYPE_96, 1, 1, 'H', 1246 CHARSET_TYPE_96, 1, 1, 'H',
1235 CHARSET_RIGHT_TO_LEFT, 1247 CHARSET_RIGHT_TO_LEFT,