annotate lisp/mule/iso-with-esc.el @ 4568:1d74a1d115ee

Add #'query-coding-region tests; do the work necessary to get them running. lisp/ChangeLog addition: 2008-12-28 Aidan Kehoe <kehoea@parhasard.net> * coding.el (default-query-coding-region): Declare using defun*, so we can #'return-from to it on encountering a safe-charsets value of t. Comment out a few debug messages. (query-coding-region): Correct the docstring, it deals with a region, not a string. (unencodable-char-position): Correct the implementation for non-nil COUNT, special-case a zero value for count, treat it as one. Don't rely on dynamic scope when calling the main lambda. * unicode.el (unicode-query-coding-region): Comment out some debug messages here. * mule/mule-coding.el (8-bit-fixed-query-coding-region): Comment out some debug messages here. * code-init.el (raw-text): Add a safe-charsets property to this coding system. * mule/korean.el (iso-2022-int-1): * mule/korean.el (euc-kr): * mule/korean.el (iso-2022-kr): Add safe-charsets properties for these coding systems. * mule/japanese.el (iso-2022-jp): * mule/japanese.el (jis7): * mule/japanese.el (jis8): * mule/japanese.el (shift-jis): * mule/japanese.el (iso-2022-jp-1978-irv): * mule/japanese.el (euc-jp): Add safe-charsets properties for all these coding systems. * mule/iso-with-esc.el: Add safe-charsets properties to all the coding systems in here. Comment on the downside of a safe-charsets value of t for iso-latin-1-with-esc. * mule/hebrew.el (ctext-hebrew): Add a safe-charsets property for this coding system. * mule/devanagari.el (in-is13194-devanagari): Add a safe-charsets property for this coding system. * mule/chinese.el (cn-gb-2312): * mule/chinese.el (hz-gb-2312): * mule/chinese.el (big5): Add safe-charsets properties for these coding systems. * mule/latin.el (iso-8859-14): Add an implementation for this, using #'make-8-bit-coding-system. * mule/mule-coding.el (ctext): * mule/mule-coding.el (iso-2022-8bit-ss2): * mule/mule-coding.el (iso-2022-7bit-ss2): * mule/mule-coding.el (iso-2022-jp-2): * mule/mule-coding.el (iso-2022-7bit): * mule/mule-coding.el (iso-2022-8): * mule/mule-coding.el (escape-quoted): * mule/mule-coding.el (iso-2022-lock): Add safe-charsets properties for all these coding systems. src/ChangeLog addition: 2008-12-28 Aidan Kehoe <kehoea@parhasard.net> * file-coding.c (Fmake_coding_system): Document our use of the safe-chars and safe-charsets properties, and the differences compared to GNU. (make_coding_system_1): Don't drop the safe-chars and safe-charsets properties. (Fcoding_system_property): Return the safe-chars and safe-charsets properties when asked for them. * file-coding.h (CODING_SYSTEM_SAFE_CHARSETS): * coding-system-slots.h: Make the safe-chars and safe-charsets slots available in these headers. tests/ChangeLog addition: 2008-12-28 Aidan Kehoe <kehoea@parhasard.net> * automated/query-coding-tests.el: New file, testing the functionality of #'query-coding-region and #'query-coding-string.
author Aidan Kehoe <kehoea@parhasard.net>
date Sun, 28 Dec 2008 14:46:24 +0000
parents d402d7b18bd8
children a67bfb29dd8b
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
4303
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
1 ;;; iso-with-esc.el --
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
2 ;;; Provision of the hateful and never widely implemented Latin, Greek and
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
3 ;;; Cyrillic variable-length ISO 2022 coding systems that passed for Latin
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
4 ;;; 2, Latin 10, (etc) support in XEmacs for so long.
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
5 ;;
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
6 ;; Copyright (C) 2006 Free Software Foundation
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
7
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
8 ;; Author: Aidan Kehoe
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
9
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
10 ;; This file is part of XEmacs.
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
11
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
12 ;; XEmacs is free software; you can redistribute it and/or modify it
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
13 ;; under the terms of the GNU General Public License as published by
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
14 ;; the Free Software Foundation; either version 2, or (at your option)
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
15 ;; any later version.
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
16
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
17 ;; XEmacs is distributed in the hope that it will be useful, but
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
18 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
19 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
20 ;; General Public License for more details.
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
21
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
22 ;; You should have received a copy of the GNU General Public License
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
23 ;; along with XEmacs; see the file COPYING. If not, write to the
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
24 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
25 ;; Boston, MA 02110-1301, USA.
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
26
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
27 ;;; Commentary:
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
28
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
29 ;;; Code:
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
30
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
31 ;; It is not particularly reasonable that iso-latin-1-with-esc has a
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
32 ;; value of t for the safe-charsets property. We discourage its use,
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
33 ;; though, and this behaviour is compatible with GNU.
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
34
4303
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
35 ;;;###autoload
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
36 (define-coding-system-alias 'iso-latin-1-with-esc 'iso-2022-8)
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
37
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
38 ;;;###autoload
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
39 (make-coding-system
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
40 'iso-latin-2-with-esc 'iso2022 "ISO-8859-2 (Latin-2)"
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
41 '(charset-g0 ascii
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
42 charset-g1 latin-iso8859-2
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
43 charset-g2 t
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
44 charset-g3 t
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
45 safe-charsets (ascii latin-iso8859-2)
4303
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
46 mnemonic "MIME/Ltn-2"))
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
47
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
48 ;;;###autoload
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
49 (make-coding-system
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
50 'iso-latin-3-with-esc 'iso2022 "ISO-8859-3 (Latin-3)"
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
51 '(charset-g0 ascii
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
52 charset-g1 latin-iso8859-3
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
53 charset-g2 t
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
54 charset-g3 t
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
55 safe-charsets (ascii latin-iso8859-3)
4303
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
56 mnemonic "MIME/Ltn-3"))
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
57
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
58 ;;;###autoload
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
59 (make-coding-system
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
60 'iso-latin-4-with-esc 'iso2022 "ISO-8859-4 (Latin-4)"
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
61 '(charset-g0 ascii
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
62 charset-g1 latin-iso8859-4
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
63 charset-g2 t
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
64 charset-g3 t
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
65 safe-charsets (ascii latin-iso8859-4)
4303
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
66 mnemonic "MIME/Ltn-4"))
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
67
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
68 ;;;###autoload
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
69 (make-coding-system
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
70 'iso-latin-9-with-esc 'iso2022
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
71 "ISO 4873 conforming 8-bit code (ASCII + Latin 9; aka Latin-1 with Euro)"
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
72 '(mnemonic "MIME/Ltn-9" ; bletch
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
73 safe-charsets (ascii latin-iso8859-15)
4303
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
74 eol-type nil
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
75 charset-g0 ascii
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
76 charset-g1 latin-iso8859-15
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
77 charset-g2 t
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
78 charset-g3 t))
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
79
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
80 ;;;###autoload
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
81 (make-coding-system
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
82 'iso-latin-5-with-esc 'iso2022 "ISO-8859-9 (Latin-5)"
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
83 '(charset-g0 ascii
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
84 charset-g1 latin-iso8859-9
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
85 charset-g2 t
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
86 charset-g3 t
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
87 safe-charsets (ascii latin-iso8859-9)
4303
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
88 mnemonic "MIME/Ltn-5"))
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
89
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
90 ;;;###autoload
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
91 (make-coding-system
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
92 'cyrillic-iso-8bit-with-esc 'iso2022
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
93 "ISO-8859-5 (Cyrillic)"
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
94 '(charset-g0 ascii
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
95 charset-g1 cyrillic-iso8859-5
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
96 charset-g2 t
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
97 charset-g3 t
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
98 safe-charsets (ascii cyrillic-iso8859-5)
4303
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
99 mnemonic "ISO8/Cyr"))
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
100
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
101 ;;;###autoload
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
102 (make-coding-system
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
103 'hebrew-iso-8bit-with-esc 'iso2022
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
104 "ISO-8859-8 (Hebrew)"
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
105 '(charset-g0 ascii
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
106 charset-g1 hebrew-iso8859-8
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
107 charset-g2 t
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
108 charset-g3 t
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
109 no-iso6429 t
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
110 safe-charsets (ascii hebrew-iso8859-8)
4303
cee827542370 [xemacs-hg @ 2007-12-04 20:18:33 by aidan]
aidan
parents:
diff changeset
111 mnemonic "MIME/Hbrw"))
4491
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
112
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
113 ;;;###autoload
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
114 (make-coding-system
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
115 'greek-iso-8bit-with-esc 'iso2022 "MIME ISO-8859-7"
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
116 '(charset-g0 ascii
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
117 charset-g1 greek-iso8859-7
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
118 charset-g2 t
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
119 charset-g3 t
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
120 safe-charsets (ascii greek-iso8859-7)
4491
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
121 mnemonic "Grk"))
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
122
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
123 ;; ISO 8859-6 is such a useless character set that it seems a waste of
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
124 ;; codespace to dump it. Let me count the ways:
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
125 ;;
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
126 ;; 1. It doesn't support Persian or Urdu, let alone Sinhalese, despite
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
127 ;; plenty of unallocated code points.
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
128 ;;
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
129 ;; 2. It doesn't encode all the vowel diacritics (the Harakaat) despite that
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
130 ;; they are necessary, even for the Arabs, for basic things like
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
131 ;; dictionary entries, children's books, and occasional disambiguation.
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
132 ;;
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
133 ;; 3. The Arabs don't use it, they use Windows-1256, which also supports
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
134 ;; Persian, at least, as well as the French characters necessary in
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
135 ;; Lebanon and North Africa.
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
136
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
137 (make-charset
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
138 'arabic-iso8859-6
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
139 "Right-Hand Part of Latin/Arabic Alphabet (ISO/IEC 8859-6): ISO-IR-127"
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
140 '(dimension 1
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
141 registry "ISO8859-6"
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
142 chars 96
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
143 columns 1
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
144 direction r2l
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
145 final ?G
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
146 graphic 1
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
147 short-name "RHP of ISO8859/6"
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
148 long-name "RHP of Arabic (ISO 8859-6): ISO-IR-127"))
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
149
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
150 (loop
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
151 for (iso8859-6 unicode)
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
152 in '((#xA0 #x00A0) ;; NO-BREAK SPACE
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
153 (#xA4 #x00A4) ;; CURRENCY SIGN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
154 (#xAC #x060C) ;; ARABIC COMMA
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
155 (#xAD #x00AD) ;; SOFT HYPHEN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
156 (#xBB #x061B) ;; ARABIC SEMICOLON
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
157 (#xBF #x061F) ;; ARABIC QUESTION MARK
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
158 (#xC1 #x0621) ;; ARABIC LETTER HAMZA
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
159 (#xC2 #x0622) ;; ARABIC LETTER ALEF WITH MADDA ABOVE
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
160 (#xC3 #x0623) ;; ARABIC LETTER ALEF WITH HAMZA ABOVE
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
161 (#xC4 #x0624) ;; ARABIC LETTER WAW WITH HAMZA ABOVE
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
162 (#xC5 #x0625) ;; ARABIC LETTER ALEF WITH HAMZA BELOW
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
163 (#xC6 #x0626) ;; ARABIC LETTER YEH WITH HAMZA ABOVE
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
164 (#xC7 #x0627) ;; ARABIC LETTER ALEF
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
165 (#xC8 #x0628) ;; ARABIC LETTER BEH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
166 (#xC9 #x0629) ;; ARABIC LETTER TEH MARBUTA
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
167 (#xCA #x062A) ;; ARABIC LETTER TEH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
168 (#xCB #x062B) ;; ARABIC LETTER THEH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
169 (#xCC #x062C) ;; ARABIC LETTER JEEM
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
170 (#xCD #x062D) ;; ARABIC LETTER HAH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
171 (#xCE #x062E) ;; ARABIC LETTER KHAH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
172 (#xCF #x062F) ;; ARABIC LETTER DAL
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
173 (#xD0 #x0630) ;; ARABIC LETTER THAL
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
174 (#xD1 #x0631) ;; ARABIC LETTER REH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
175 (#xD2 #x0632) ;; ARABIC LETTER ZAIN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
176 (#xD3 #x0633) ;; ARABIC LETTER SEEN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
177 (#xD4 #x0634) ;; ARABIC LETTER SHEEN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
178 (#xD5 #x0635) ;; ARABIC LETTER SAD
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
179 (#xD6 #x0636) ;; ARABIC LETTER DAD
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
180 (#xD7 #x0637) ;; ARABIC LETTER TAH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
181 (#xD8 #x0638) ;; ARABIC LETTER ZAH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
182 (#xD9 #x0639) ;; ARABIC LETTER AIN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
183 (#xDA #x063A) ;; ARABIC LETTER GHAIN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
184 (#xE0 #x0640) ;; ARABIC TATWEEL
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
185 (#xE1 #x0641) ;; ARABIC LETTER FEH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
186 (#xE2 #x0642) ;; ARABIC LETTER QAF
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
187 (#xE3 #x0643) ;; ARABIC LETTER KAF
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
188 (#xE4 #x0644) ;; ARABIC LETTER LAM
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
189 (#xE5 #x0645) ;; ARABIC LETTER MEEM
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
190 (#xE6 #x0646) ;; ARABIC LETTER NOON
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
191 (#xE7 #x0647) ;; ARABIC LETTER HEH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
192 (#xE8 #x0648) ;; ARABIC LETTER WAW
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
193 (#xE9 #x0649) ;; ARABIC LETTER ALEF MAKSURA
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
194 (#xEA #x064A) ;; ARABIC LETTER YEH
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
195 (#xEB #x064B) ;; ARABIC FATHATAN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
196 (#xEC #x064C) ;; ARABIC DAMMATAN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
197 (#xED #x064D) ;; ARABIC KASRATAN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
198 (#xEE #x064E) ;; ARABIC FATHA
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
199 (#xEF #x064F) ;; ARABIC DAMMA
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
200 (#xF0 #x0650) ;; ARABIC KASRA
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
201 (#xF1 #x0651) ;; ARABIC SHADDA
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
202 (#xF2 #x0652));; ARABIC SUKUN
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
203 do (set-unicode-conversion (make-char 'arabic-iso8859-6 iso8859-6)
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
204 unicode))
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
205
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
206 ;;;###autoload
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
207 (make-coding-system
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
208 'arabic-iso-8bit-with-esc 'iso2022 ;; GNU's iso-8859-6 is
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
209 ;; iso2022-compatible.
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
210 "ISO-8859-6 (Arabic)"
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
211 '(charset-g0 ascii
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
212 charset-g1 arabic-iso8859-6
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
213 charset-g2 t
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
214 charset-g3 t
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
215 no-iso6429 t
4568
1d74a1d115ee Add #'query-coding-region tests; do the work necessary to get them running.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4491
diff changeset
216 safe-charsets (ascii arabic-iso8859-6)
4491
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
217 mnemonic "MIME/Arbc"))
d402d7b18bd8 Revamp the Arabic support. Create greek-iso-8bit-with-esc, arabic-iso-8bit-with-esc.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4303
diff changeset
218