annotate lisp/language/cyrillic.el @ 101914:fc3f7f3a49fc

Remove platform-independent -j comments. Remove deleted --enable-cocoa-experimental-ctrl-g option.
author Glenn Morris <rgm@gnu.org>
date Tue, 10 Feb 2009 03:29:00 +0000
parents a9dc0e7c3f2b
children 1d1d5d9bd884
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
38414
67b464da13ec Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents: 37112
diff changeset
1 ;;; cyrillic.el --- support for Cyrillic -*- coding: iso-2022-7bit; -*-
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
2
100908
a9dc0e7c3f2b Add 2009 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 94665
diff changeset
3 ;; Copyright (C) 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
74544
43cc94d955c2 Update copyright years.
Glenn Morris <rgm@gnu.org>
parents: 64085
diff changeset
4 ;; Free Software Foundation, Inc.
74605
6ee41fdd69ff Update AIST copyright years.
Kenichi Handa <handa@m17n.org>
parents: 74544
diff changeset
5 ;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
100908
a9dc0e7c3f2b Add 2009 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 94665
diff changeset
6 ;; 2005, 2006, 2007, 2008, 2009
62396
197607499a29 Fix copyrights.
Kenichi Handa <handa@m17n.org>
parents: 56710
diff changeset
7 ;; National Institute of Advanced Industrial Science and Technology (AIST)
197607499a29 Fix copyrights.
Kenichi Handa <handa@m17n.org>
parents: 56710
diff changeset
8 ;; Registration Number H14PRO021
89483
2f877ed80fa6 *** empty log message ***
Kenichi Handa <handa@m17n.org>
parents: 88123 89319
diff changeset
9 ;; Copyright (C) 2003
2f877ed80fa6 *** empty log message ***
Kenichi Handa <handa@m17n.org>
parents: 88123 89319
diff changeset
10 ;; National Institute of Advanced Industrial Science and Technology (AIST)
2f877ed80fa6 *** empty log message ***
Kenichi Handa <handa@m17n.org>
parents: 88123 89319
diff changeset
11 ;; Registration Number H13PRO009
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
12
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
13 ;; Author: Kenichi Handa <handa@etl.go.jp>
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
14 ;; Keywords: multilingual, Cyrillic, i18n
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
15
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
16 ;; This file is part of GNU Emacs.
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
17
94665
55b7f25d920a Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 93975
diff changeset
18 ;; GNU Emacs is free software: you can redistribute it and/or modify
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
19 ;; it under the terms of the GNU General Public License as published by
94665
55b7f25d920a Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 93975
diff changeset
20 ;; the Free Software Foundation, either version 3 of the License, or
55b7f25d920a Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 93975
diff changeset
21 ;; (at your option) any later version.
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
22
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
23 ;; GNU Emacs is distributed in the hope that it will be useful,
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
24 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
25 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
26 ;; GNU General Public License for more details.
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
27
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
28 ;; You should have received a copy of the GNU General Public License
94665
55b7f25d920a Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 93975
diff changeset
29 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
30
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
31 ;;; Commentary:
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
32
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
33 ;; The character set ISO8859-5 is supported. KOI-8 and ALTERNATIVNYJ
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
34 ;; are converted to Unicode internally. See
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
35 ;; <URL:http://www.ecma.ch/ecma1/STAND/ECMA-113.HTM>. For more info
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
36 ;; on Cyrillic charsets, see
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
37 ;; <URL:http://czyborra.com/charsets/cyrillic.html>. The KOI and
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
38 ;; Alternativnyj coding systems should live in code-pages.el, but
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
39 ;; they've always been preloaded and the coding system autoload
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
40 ;; mechanism didn't get accepted, so they have to stay here and
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
41 ;; duplicate code-pages stuff.
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
42
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
43 ;; Note that 8859-5 maps directly onto the Unicode Cyrillic block,
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
44 ;; apart from codepoints 160 (NBSP, c.f. U+0400), 173 (soft hyphen,
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
45 ;; c.f. U+04OD) and 253 (section sign, c.f U+045D). The KOI-8 and
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
46 ;; Alternativnyj coding systems encode both 8859-5 and Unicode.
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
47 ;; ucs-tables.el provides unification for cyrillic-iso-8bit.
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
48
47702
e0786a68f34e (ccl-decode-koi8): Refer to
Kenichi Handa <handa@m17n.org>
parents: 47416
diff changeset
49 ;; Customizing `utf-fragment-on-decoding' allows decoding characters
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
50 ;; from KOI and Alternativnyj into 8859-5 where that's possible.
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
51 ;; cyrillic-iso8859-5 characters take half as much space in the buffer
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
52 ;; as the mule-unicode-0100-24ff equivalents, though that's probably
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
53 ;; not normally a big deal.
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
54
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
55 ;;; Code:
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
56
19451
933bea774c3c Make describe-cyrillic-environment-map and
Kenichi Handa <handa@m17n.org>
parents: 18520
diff changeset
57 ;; Cyrillic (general)
933bea774c3c Make describe-cyrillic-environment-map and
Kenichi Handa <handa@m17n.org>
parents: 18520
diff changeset
58
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
59 ;; ISO-8859-5 stuff
17085
4dafa5431293 Change coding system name koi8 to koi8-r.
Kenichi Handa <handa@m17n.org>
parents: 17071
diff changeset
60
88414
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
61 (define-coding-system 'cyrillic-iso-8bit
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
62 "ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)."
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
63 :coding-type 'charset
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
64 :mnemonic ?5
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
65 :charset-list '(iso-8859-5)
88512
1e2fb9a9f29c (cyrillic-iso-8bit, cyrillic-koi8)
Dave Love <fx@gnu.org>
parents: 88414
diff changeset
66 :mime-charset 'iso-8859-5)
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
67
18520
383d11185239 Swap args to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents: 18454
diff changeset
68 (define-coding-system-alias 'iso-8859-5 'cyrillic-iso-8bit)
18308
b8622afb8a6e Don't make the keymap
Kenichi Handa <handa@m17n.org>
parents: 18203
diff changeset
69
19451
933bea774c3c Make describe-cyrillic-environment-map and
Kenichi Handa <handa@m17n.org>
parents: 18520
diff changeset
70 (set-language-info-alist
88414
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
71 "Cyrillic-ISO" '((charset iso-8859-5)
20745
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
72 (coding-system cyrillic-iso-8bit)
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
73 (coding-priority cyrillic-iso-8bit)
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
74 (input-method . "cyrillic-yawerty") ; fixme
88414
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
75 (nonascii-translation . iso-8859-5)
22983
7a010b8c0d99 ("LANUGAGE-ENVIRONMENT"): Delete property setup-function or change
Kenichi Handa <handa@m17n.org>
parents: 22881
diff changeset
76 (unibyte-display . cyrillic-iso-8bit)
7a010b8c0d99 ("LANUGAGE-ENVIRONMENT"): Delete property setup-function or change
Kenichi Handa <handa@m17n.org>
parents: 22881
diff changeset
77 (features cyril-util)
19451
933bea774c3c Make describe-cyrillic-environment-map and
Kenichi Handa <handa@m17n.org>
parents: 18520
diff changeset
78 (sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
20745
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
79 (documentation . "Support for Cyrillic ISO-8859-5."))
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
80 '("Cyrillic"))
19451
933bea774c3c Make describe-cyrillic-environment-map and
Kenichi Handa <handa@m17n.org>
parents: 18520
diff changeset
81
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
82 ;; KOI-8R stuff
17085
4dafa5431293 Change coding system name koi8 to koi8-r.
Kenichi Handa <handa@m17n.org>
parents: 17071
diff changeset
83
88414
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
84 (define-coding-system 'cyrillic-koi8
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
85 "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)."
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
86 :coding-type 'charset
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
87 ;; We used to use ?K. It is true that ?K is more strictly correct,
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
88 ;; but it is also used for Korean. So people who use koi8 for
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
89 ;; languages other than Russian will have to forgive us.
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
90 :mnemonic ?R
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
91 :charset-list '(koi8)
88512
1e2fb9a9f29c (cyrillic-iso-8bit, cyrillic-koi8)
Dave Love <fx@gnu.org>
parents: 88414
diff changeset
92 :mime-charset 'koi8-r)
17085
4dafa5431293 Change coding system name koi8 to koi8-r.
Kenichi Handa <handa@m17n.org>
parents: 17071
diff changeset
93
18520
383d11185239 Swap args to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents: 18454
diff changeset
94 (define-coding-system-alias 'koi8-r 'cyrillic-koi8)
383d11185239 Swap args to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents: 18454
diff changeset
95 (define-coding-system-alias 'koi8 'cyrillic-koi8)
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
96 (define-coding-system-alias 'cp878 'cyrillic-koi8)
17085
4dafa5431293 Change coding system name koi8 to koi8-r.
Kenichi Handa <handa@m17n.org>
parents: 17071
diff changeset
97
19451
933bea774c3c Make describe-cyrillic-environment-map and
Kenichi Handa <handa@m17n.org>
parents: 18520
diff changeset
98 (set-language-info-alist
88414
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
99 "Cyrillic-KOI8" `((charset koi8)
20745
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
100 (coding-system cyrillic-koi8)
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
101 (coding-priority cyrillic-koi8 cyrillic-iso-8bit)
56710
e6d92cac8e9b ("Cyrillic-KOI8"): Fix typo.
Kenichi Handa <handa@m17n.org>
parents: 56709
diff changeset
102 (ctext-non-standard-encodings "koi8-r")
88414
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
103 (nonascii-translation . koi8)
49795
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
104 (input-method . "russian-typewriter")
22983
7a010b8c0d99 ("LANUGAGE-ENVIRONMENT"): Delete property setup-function or change
Kenichi Handa <handa@m17n.org>
parents: 22881
diff changeset
105 (features cyril-util)
7a010b8c0d99 ("LANUGAGE-ENVIRONMENT"): Delete property setup-function or change
Kenichi Handa <handa@m17n.org>
parents: 22881
diff changeset
106 (unibyte-display . cyrillic-koi8)
19451
933bea774c3c Make describe-cyrillic-environment-map and
Kenichi Handa <handa@m17n.org>
parents: 18520
diff changeset
107 (sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
22881
e0e17bbd8e6c (cyrillic-koi8-r-decode-table): New
Kenichi Handa <handa@m17n.org>
parents: 21663
diff changeset
108 (documentation . "Support for Cyrillic KOI8-R."))
20745
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
109 '("Cyrillic"))
19451
933bea774c3c Make describe-cyrillic-environment-map and
Kenichi Handa <handa@m17n.org>
parents: 18520
diff changeset
110
49795
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
111 (set-language-info-alist
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
112 "Russian" `((charset cyrillic-iso8859-5)
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
113 (nonascii-translation
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
114 . ,(get 'cyrillic-koi8-r-nonascii-translation-table
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
115 'translation-table))
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
116 (coding-system cyrillic-koi8)
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
117 (coding-priority cyrillic-koi8 cyrillic-iso-8bit)
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
118 (input-method . "russian-computer")
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
119 (features cyril-util)
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
120 (unibyte-display . cyrillic-koi8)
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
121 (sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
122 (documentation . "\
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
123 Support for Russian using koi8-r and the russian-computer input method.")
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
124 (tutorial . "TUTORIAL.ru"))
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
125 '("Cyrillic"))
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
126
89909
68c22ea6027c Sync to HEAD
Kenichi Handa <handa@m17n.org>
parents: 89483
diff changeset
127 (define-coding-system 'koi8-u
68c22ea6027c Sync to HEAD
Kenichi Handa <handa@m17n.org>
parents: 89483
diff changeset
128 "KOI8-U 8-bit encoding for Cyrillic (MIME: KOI8-U)"
68c22ea6027c Sync to HEAD
Kenichi Handa <handa@m17n.org>
parents: 89483
diff changeset
129 :coding-type 'charset
68c22ea6027c Sync to HEAD
Kenichi Handa <handa@m17n.org>
parents: 89483
diff changeset
130 :mnemonic ?U
68c22ea6027c Sync to HEAD
Kenichi Handa <handa@m17n.org>
parents: 89483
diff changeset
131 :charset-list '(koi8-u)
68c22ea6027c Sync to HEAD
Kenichi Handa <handa@m17n.org>
parents: 89483
diff changeset
132 :mime-charset 'koi8-u)
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
133
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
134 (set-language-info-alist
89909
68c22ea6027c Sync to HEAD
Kenichi Handa <handa@m17n.org>
parents: 89483
diff changeset
135 "Ukrainian" `((charset koi8-u)
68c22ea6027c Sync to HEAD
Kenichi Handa <handa@m17n.org>
parents: 89483
diff changeset
136 (coding-system koi8-u)
47702
e0786a68f34e (ccl-decode-koi8): Refer to
Kenichi Handa <handa@m17n.org>
parents: 47416
diff changeset
137 (coding-priority koi8-u)
89909
68c22ea6027c Sync to HEAD
Kenichi Handa <handa@m17n.org>
parents: 89483
diff changeset
138 (nonascii-translation . koi8-u)
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
139 (input-method . "ukrainian-computer")
47702
e0786a68f34e (ccl-decode-koi8): Refer to
Kenichi Handa <handa@m17n.org>
parents: 47416
diff changeset
140 (documentation
e0786a68f34e (ccl-decode-koi8): Refer to
Kenichi Handa <handa@m17n.org>
parents: 47416
diff changeset
141 . "Support for Ukrainian with KOI8-U character set."))
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
142 '("Cyrillic"))
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
143
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
144 ;;; ALTERNATIVNYJ stuff
17085
4dafa5431293 Change coding system name koi8 to koi8-r.
Kenichi Handa <handa@m17n.org>
parents: 17071
diff changeset
145
88414
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
146 (define-coding-system 'cyrillic-alternativnyj
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
147 "ALTERNATIVNYJ 8-bit encoding for Cyrillic."
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
148 :coding-type 'charset
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
149 :mnemonic ?A
89204
e7cc92cb7ad5 (cyrillic-alternativnyj): Remove
Dave Love <fx@gnu.org>
parents: 89186
diff changeset
150 :charset-list '(alternativnyj))
17085
4dafa5431293 Change coding system name koi8 to koi8-r.
Kenichi Handa <handa@m17n.org>
parents: 17071
diff changeset
151
18520
383d11185239 Swap args to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents: 18454
diff changeset
152 (define-coding-system-alias 'alternativnyj 'cyrillic-alternativnyj)
18308
b8622afb8a6e Don't make the keymap
Kenichi Handa <handa@m17n.org>
parents: 18203
diff changeset
153
17993
73869115ae0a Most of setup-LANGUAGE-environment functions are
Kenichi Handa <handa@m17n.org>
parents: 17841
diff changeset
154 (set-language-info-alist
88414
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
155 "Cyrillic-ALT" `((charset alternativnyj)
20745
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
156 (coding-system cyrillic-alternativnyj)
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
157 (coding-priority cyrillic-alternativnyj)
88414
fad0f879877f Call define-coding-system instead of make-coding-system. All CCL program deleted.
Kenichi Handa <handa@m17n.org>
parents: 42152
diff changeset
158 (nonascii-translation . alternativnyj)
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
159 (input-method . "russian-typewriter")
22983
7a010b8c0d99 ("LANUGAGE-ENVIRONMENT"): Delete property setup-function or change
Kenichi Handa <handa@m17n.org>
parents: 22881
diff changeset
160 (features cyril-util)
7a010b8c0d99 ("LANUGAGE-ENVIRONMENT"): Delete property setup-function or change
Kenichi Handa <handa@m17n.org>
parents: 22881
diff changeset
161 (unibyte-display . cyrillic-alternativnyj)
19451
933bea774c3c Make describe-cyrillic-environment-map and
Kenichi Handa <handa@m17n.org>
parents: 18520
diff changeset
162 (sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
20745
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
163 (documentation . "Support for Cyrillic ALTERNATIVNYJ."))
00aa1d4fa378 Remove setting up of
Kenichi Handa <handa@m17n.org>
parents: 20233
diff changeset
164 '("Cyrillic"))
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
165
89204
e7cc92cb7ad5 (cyrillic-alternativnyj): Remove
Dave Love <fx@gnu.org>
parents: 89186
diff changeset
166 (define-coding-system 'cp866
e7cc92cb7ad5 (cyrillic-alternativnyj): Remove
Dave Love <fx@gnu.org>
parents: 89186
diff changeset
167 "CP866 encoding for Cyrillic."
e7cc92cb7ad5 (cyrillic-alternativnyj): Remove
Dave Love <fx@gnu.org>
parents: 89186
diff changeset
168 :coding-type 'charset
e7cc92cb7ad5 (cyrillic-alternativnyj): Remove
Dave Love <fx@gnu.org>
parents: 89186
diff changeset
169 :mnemonic ?*
e7cc92cb7ad5 (cyrillic-alternativnyj): Remove
Dave Love <fx@gnu.org>
parents: 89186
diff changeset
170 :charset-list '(ibm866)
e7cc92cb7ad5 (cyrillic-alternativnyj): Remove
Dave Love <fx@gnu.org>
parents: 89186
diff changeset
171 :mime-charset 'cp866)
e7cc92cb7ad5 (cyrillic-alternativnyj): Remove
Dave Love <fx@gnu.org>
parents: 89186
diff changeset
172
88531
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
173 (define-coding-system 'koi8-u
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
174 "KOI8-U 8-bit encoding for Cyrillic (MIME: KOI8-U)"
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
175 :coding-type 'charset
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
176 :mnemonic ?U
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
177 :charset-list '(koi8-u)
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
178 :mime-charset 'koi8-u)
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
179
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
180 (define-coding-system 'koi8-t
88766
4eeed541231e ("Belarusian"): Doc fix.
Dave Love <fx@gnu.org>
parents: 88733
diff changeset
181 "KOI8-T 8-bit encoding for Cyrillic"
88531
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
182 :coding-type 'charset
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
183 :mnemonic ?*
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
184 :charset-list '(koi8-t)
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
185 :mime-charset 'koi8-t)
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
186
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
187 (define-coding-system 'windows-1251
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
188 "windows-1251 8-bit encoding for Cyrillic (MIME: WINDOWS-1251)"
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
189 :coding-type 'charset
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
190 :mnemonic ?b
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
191 :charset-list '(windows-1251)
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
192 :mime-charset 'windows-1251)
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
193 (define-coding-system-alias 'cp1251 'windows-1251)
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
194
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
195 (define-coding-system 'cp1125
88766
4eeed541231e ("Belarusian"): Doc fix.
Dave Love <fx@gnu.org>
parents: 88733
diff changeset
196 "cp1125 8-bit encoding for Cyrillic"
88531
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
197 :coding-type 'charset
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
198 :mnemonic ?*
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
199 :charset-list '(cp1125))
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
200 (define-coding-system-alias 'ruscii 'cp1125)
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
201 ;; Original name for cp1125, says Serhii Hlodin <hlodin@lutsk.bank.gov.ua>
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
202 (define-coding-system-alias 'cp866u 'cp1125)
3080874809b6 (koi8-u, koi8-t, windows-1251, cp1125): New
Dave Love <fx@gnu.org>
parents: 88512
diff changeset
203
88615
fc355fbbbbcc (cp855, ibm855): New coding systems.
Dave Love <fx@gnu.org>
parents: 88531
diff changeset
204 (define-coding-system 'cp855
fc355fbbbbcc (cp855, ibm855): New coding systems.
Dave Love <fx@gnu.org>
parents: 88531
diff changeset
205 "DOS codepage 855 (Russian)"
fc355fbbbbcc (cp855, ibm855): New coding systems.
Dave Love <fx@gnu.org>
parents: 88531
diff changeset
206 :coding-type 'charset
fc355fbbbbcc (cp855, ibm855): New coding systems.
Dave Love <fx@gnu.org>
parents: 88531
diff changeset
207 :mnemonic ?D
fc355fbbbbcc (cp855, ibm855): New coding systems.
Dave Love <fx@gnu.org>
parents: 88531
diff changeset
208 :charset-list '(cp855)
fc355fbbbbcc (cp855, ibm855): New coding systems.
Dave Love <fx@gnu.org>
parents: 88531
diff changeset
209 :mime-charset 'cp855)
fc355fbbbbcc (cp855, ibm855): New coding systems.
Dave Love <fx@gnu.org>
parents: 88531
diff changeset
210 (define-coding-system-alias 'ibm855 'cp855)
fc355fbbbbcc (cp855, ibm855): New coding systems.
Dave Love <fx@gnu.org>
parents: 88531
diff changeset
211
89319
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
212 (define-coding-system 'mik
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
213 "Bulgarian DOS codepage"
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
214 :coding-type 'charset
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
215 :mnemonic ?D
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
216 :charset-list '(mik))
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
217
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
218 (define-coding-system 'pt154
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
219 "Parattype Asian Cyrillic codepage"
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
220 :coding-type 'charset
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
221 :mnemonic ?D
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
222 :charset-list '(pt154))
024ef414966c (mik, pt154): New coding systems.
Dave Love <fx@gnu.org>
parents: 89204
diff changeset
223
88733
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
224 ;; (set-language-info-alist
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
225 ;; "Windows-1251" `((coding-system windows-1251)
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
226 ;; (coding-priority windows-1251)
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
227 ;; (input-method . "russian-typewriter") ; fixme?
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
228 ;; (features code-pages)
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
229 ;; (documentation . "Support for windows-1251 character set."))
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
230 ;; '("Cyrillic"))
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
231
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
232 (set-language-info-alist
88991
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
233 "Tajik" `((coding-system koi8-t)
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
234 (coding-priority koi8-t)
88733
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
235 (nonascii-translation . cyrillic-koi8-t)
89186
af4d3d2b9101 ("Bulgarian"): Fix input method and
Dave Love <fx@gnu.org>
parents: 88991
diff changeset
236 (charset koi8-t)
49795
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
237 (input-method . "russian-typewriter") ; fixme?
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
238 (features code-pages)
0f184780c237 ("Cyrillic-KOI8"): Fix input-method.
Dave Love <fx@gnu.org>
parents: 48832
diff changeset
239 (documentation . "Support for Tajik using KOI8-T."))
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
240 '("Cyrillic"))
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
241
53242
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
242 (let ((elt `("microsoft-cp1251" windows-1251 1
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
243 ,(get 'encode-windows-1251 'translation-table)))
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
244 (slot (assoc "microsoft-cp1251" ctext-non-standard-encodings-alist)))
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
245 (if slot
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
246 (setcdr slot (cdr elt))
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
247 (push elt ctext-non-standard-encodings-alist)))
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
248
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
249 (set-language-info-alist
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
250 "Bulgarian" `((coding-system windows-1251)
53242
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
251 (coding-priority windows-1251)
88733
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
252 (nonascii-translation . windows-1251)
89186
af4d3d2b9101 ("Bulgarian"): Fix input method and
Dave Love <fx@gnu.org>
parents: 88991
diff changeset
253 (charset windows-1251)
53242
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
254 (ctext-non-standard-encodings "microsoft-cp1251")
47906
470049d232d2 (cyrillic-alternativnyj-decode-table): Fix
Kenichi Handa <handa@m17n.org>
parents: 47702
diff changeset
255 (input-method . "bulgarian-bds")
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
256 (documentation
88733
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
257 . "Support for Bulgrian with windows-1251 character set."))
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
258 '("Cyrillic"))
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
259
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
260 (set-language-info-alist
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
261 "Belarusian" `((coding-system windows-1251)
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
262 (coding-priority windows-1251)
88733
bd5a6493c5fc ("Tajik", "Bulgarian", "Belarusian"): New
Dave Love <fx@gnu.org>
parents: 88615
diff changeset
263 (nonascii-translation . windows-1251)
89186
af4d3d2b9101 ("Bulgarian"): Fix input method and
Dave Love <fx@gnu.org>
parents: 88991
diff changeset
264 (charset windows-1251)
53242
e8f42b49f71f Register "microsoft-cp1251" in ctext-non-standard-encodings-alist.
Kenichi Handa <handa@m17n.org>
parents: 52720
diff changeset
265 (ctext-non-standard-encodings "microsoft-cp1251")
46500
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
266 (input-method . "belarusian")
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
267 (documentation
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
268 . "Support for Belarusian with windows-1251 character set.
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
269 \(The name Belarusian replaced Byelorussian in the early 1990s.)"))
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
270 '("Cyrillic"))
81c9cd627d93 (cyrillic-koi8-r-decode-table)
Dave Love <fx@gnu.org>
parents: 45639
diff changeset
271
88991
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
272 (set-language-info-alist
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
273 "Ukrainian" `((coding-system koi8-u)
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
274 (coding-priority koi8-u)
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
275 (input-method . "ukrainian-computer")
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
276 (documentation
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
277 . "Support for Ukrainian with koi8-u character set."))
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
278 '("Cyrillic"))
8f20edeaf2e8 ("Tajik", "Bulgarian", "Belarusian"): Add
Dave Love <fx@gnu.org>
parents: 88766
diff changeset
279
33778
6d966e8b4bbe Use provide.
Dave Love <fx@gnu.org>
parents: 30495
diff changeset
280 (provide 'cyrillic)
6d966e8b4bbe Use provide.
Dave Love <fx@gnu.org>
parents: 30495
diff changeset
281
93975
1e3a407766b9 Fix up comment convention on the arch-tag lines.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 91327
diff changeset
282 ;; arch-tag: bda71ae0-ba41-4cb6-a6e0-1dff542313d3
17052
d0d7b244b1d0 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
283 ;;; cyrillic.el ends here