36 |
|
|
37 |
(make-coding-system |
(make-coding-system |
38 |
'cyrillic-iso-8bit 2 ?5 |
'cyrillic-iso-8bit 2 ?5 |
39 |
"ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)" |
"ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)." |
40 |
'(ascii cyrillic-iso8859-5 nil nil |
'(ascii cyrillic-iso8859-5 nil nil |
41 |
nil nil nil nil nil nil nil) |
nil nil nil nil nil nil nil) |
42 |
'((safe-charsets ascii cyrillic-iso8859-5) |
'((safe-charsets ascii cyrillic-iso8859-5) |
111 |
;; but it is also used for Korean. |
;; but it is also used for Korean. |
112 |
;; So people who use koi8 for languages other than Russian |
;; So people who use koi8 for languages other than Russian |
113 |
;; will have to forgive us. |
;; will have to forgive us. |
114 |
?R "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)" |
?R |
115 |
|
"KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)." |
116 |
'(ccl-decode-koi8 . ccl-encode-koi8) |
'(ccl-decode-koi8 . ccl-encode-koi8) |
117 |
`((safe-chars . ,(let ((table (make-char-table 'safe-chars)) |
`((safe-chars . ,(let ((table (make-char-table 'safe-chars)) |
118 |
(i 0)) |
(i 0)) |
203 |
|
|
204 |
(make-coding-system |
(make-coding-system |
205 |
'cyrillic-alternativnyj 4 ?A |
'cyrillic-alternativnyj 4 ?A |
206 |
"ALTERNATIVNYJ 8-bit encoding for Cyrillic" |
"ALTERNATIVNYJ 8-bit encoding for Cyrillic." |
207 |
'(ccl-decode-alternativnyj . ccl-encode-alternativnyj) |
'(ccl-decode-alternativnyj . ccl-encode-alternativnyj) |
208 |
`((safe-chars . ,(let ((table (make-char-table 'safe-chars)) |
`((safe-chars . ,(let ((table (make-char-table 'safe-chars)) |
209 |
(i 0)) |
(i 0)) |