Mercurial > hg > xemacs-beta

comparison src/mule-charset.c @ 4491:d402d7b18bd8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc. src/ChangeLog addition: 2008-08-05 Aidan Kehoe <kehoea@parhasard.net> * mule-charset.c (complex_vars_of_mule_charset): Remove Vcharset_arabic_iso8859_7. * lisp.h: Remove Vcharset_arabic_iso8859_7. See commentary in lisp/mule/iso-with-esc.el for motivation. lisp/ChangeLog addition: 2008-08-05 Aidan Kehoe <kehoea@parhasard.net> * mule/iso-with-esc.el (greek-iso-8bit-with-esc): (arabic-iso-8bit-with-esc): Add these two here. Move the implementation of the 'arabic-iso8859-6 character set here, with commentary on why that is reasonable. * mule/arabic.el (iso-8859-6): Add iso-8859-6, windows-1256 implementations using make-8-bit-coding-system. Remove our non-standard Mule character sets. * unicode.el (load-unicode-tables): Remove Arabic since it's no longer dumped. * mule/mule-msw-init-late.el: Remove Arabic. * mule/mule-category.el (predefined-category-list): Remove Arabic. etc/ChangeLog addition: 2008-08-05 Aidan Kehoe <kehoea@parhasard.net> * HELLO: Encode the Arabic using UTF-8 sequences, not ISO-8859-6.
author Aidan Kehoe <kehoea@parhasard.net>
date Tue, 05 Aug 2008 08:37:17 +0200
parents bd7108edc555
children 3ba90c659d01
comparison
equal deleted inserted replaced
4488:6b0000935adc 4491:d402d7b18bd8
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;
51 Lisp_Object Vcharset_hebrew_iso8859_8; 50 Lisp_Object Vcharset_hebrew_iso8859_8;
52 Lisp_Object Vcharset_katakana_jisx0201; 51 Lisp_Object Vcharset_katakana_jisx0201;
53 Lisp_Object Vcharset_latin_jisx0201; 52 Lisp_Object Vcharset_latin_jisx0201;
54 Lisp_Object Vcharset_cyrillic_iso8859_5; 53 Lisp_Object Vcharset_cyrillic_iso8859_5;
55 Lisp_Object Vcharset_latin_iso8859_9; 54 Lisp_Object Vcharset_latin_iso8859_9;
92 Qlatin_iso8859_2, 91 Qlatin_iso8859_2,
93 Qlatin_iso8859_3, 92 Qlatin_iso8859_3,
94 Qlatin_iso8859_4, 93 Qlatin_iso8859_4,
95 Qthai_tis620, 94 Qthai_tis620,
96 Qgreek_iso8859_7, 95 Qgreek_iso8859_7,
97 Qarabic_iso8859_6,
98 Qhebrew_iso8859_8, 96 Qhebrew_iso8859_8,
99 Qkatakana_jisx0201, 97 Qkatakana_jisx0201,
100 Qlatin_jisx0201, 98 Qlatin_jisx0201,
101 Qcyrillic_iso8859_5, 99 Qcyrillic_iso8859_5,
102 Qlatin_iso8859_9, 100 Qlatin_iso8859_9,
1110 DEFSYMBOL (Qlatin_iso8859_2); 1108 DEFSYMBOL (Qlatin_iso8859_2);
1111 DEFSYMBOL (Qlatin_iso8859_3); 1109 DEFSYMBOL (Qlatin_iso8859_3);
1112 DEFSYMBOL (Qlatin_iso8859_4); 1110 DEFSYMBOL (Qlatin_iso8859_4);
1113 DEFSYMBOL (Qthai_tis620); 1111 DEFSYMBOL (Qthai_tis620);
1114 DEFSYMBOL (Qgreek_iso8859_7); 1112 DEFSYMBOL (Qgreek_iso8859_7);
1115 DEFSYMBOL (Qarabic_iso8859_6);
1116 DEFSYMBOL (Qhebrew_iso8859_8); 1113 DEFSYMBOL (Qhebrew_iso8859_8);
1117 DEFSYMBOL (Qkatakana_jisx0201); 1114 DEFSYMBOL (Qkatakana_jisx0201);
1118 DEFSYMBOL (Qlatin_jisx0201); 1115 DEFSYMBOL (Qlatin_jisx0201);
1119 DEFSYMBOL (Qcyrillic_iso8859_5); 1116 DEFSYMBOL (Qcyrillic_iso8859_5);
1120 DEFSYMBOL (Qlatin_iso8859_9); 1117 DEFSYMBOL (Qlatin_iso8859_9);
1234 CHARSET_LEFT_TO_RIGHT, 1231 CHARSET_LEFT_TO_RIGHT,
1235 build_string ("ISO8859-7"), 1232 build_string ("ISO8859-7"),
1236 build_msg_string ("ISO8859-7 (Greek)"), 1233 build_msg_string ("ISO8859-7 (Greek)"),
1237 build_msg_string ("ISO8859-7 (Greek)"), 1234 build_msg_string ("ISO8859-7 (Greek)"),
1238 vector1(build_string("iso8859-7")), 0, 0); 1235 vector1(build_string("iso8859-7")), 0, 0);
1239 staticpro (&Vcharset_arabic_iso8859_6);
1240 Vcharset_arabic_iso8859_6 =
1241 make_charset (LEADING_BYTE_ARABIC_ISO8859_6, Qarabic_iso8859_6, 2,
1242 CHARSET_TYPE_96, 1, 1, 'G',
1243 CHARSET_RIGHT_TO_LEFT,
1244 build_string ("ISO8859-6"),
1245 build_msg_string ("ISO8859-6 (Arabic)"),
1246 build_msg_string ("ISO8859-6 (Arabic)"),
1247 vector1(build_string ("iso8859-6")), 0, 0);
1248 staticpro (&Vcharset_hebrew_iso8859_8); 1236 staticpro (&Vcharset_hebrew_iso8859_8);
1249 Vcharset_hebrew_iso8859_8 = 1237 Vcharset_hebrew_iso8859_8 =
1250 make_charset (LEADING_BYTE_HEBREW_ISO8859_8, Qhebrew_iso8859_8, 2, 1238 make_charset (LEADING_BYTE_HEBREW_ISO8859_8, Qhebrew_iso8859_8, 2,
1251 CHARSET_TYPE_96, 1, 1, 'H', 1239 CHARSET_TYPE_96, 1, 1, 'H',
1252 CHARSET_RIGHT_TO_LEFT, 1240 CHARSET_RIGHT_TO_LEFT,