diff options
author | Dave Love <fx@gnu.org> | 2002-05-16 19:11:09 +0000 |
---|---|---|
committer | Dave Love <fx@gnu.org> | 2002-05-16 19:11:09 +0000 |
commit | a07aa6808d3a0f59d6856ceb794ffd6912da10f5 (patch) | |
tree | 743e0aa6af43d16fe9aaec027d09dcb75910d267 /lisp/language/cyrillic.el | |
parent | 46a0591ce18349ac4735ef7b5ff275368e39941a (diff) | |
download | emacs-a07aa6808d3a0f59d6856ceb794ffd6912da10f5.tar.gz emacs-a07aa6808d3a0f59d6856ceb794ffd6912da10f5.tar.bz2 emacs-a07aa6808d3a0f59d6856ceb794ffd6912da10f5.zip |
(koi8-u, koi8-t, windows-1251, cp1125): New
coding systems.
Diffstat (limited to 'lisp/language/cyrillic.el')
-rw-r--r-- | lisp/language/cyrillic.el | 37 |
1 files changed, 34 insertions, 3 deletions
diff --git a/lisp/language/cyrillic.el b/lisp/language/cyrillic.el index 0c2b26ef933..b1cd6ff8c88 100644 --- a/lisp/language/cyrillic.el +++ b/lisp/language/cyrillic.el @@ -32,7 +32,7 @@ ;; Cyrillic (general) -;; ISO-8859-5 staff +;; ISO-8859-5 stuff (define-coding-system 'cyrillic-iso-8bit "ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)." @@ -55,7 +55,7 @@ (documentation . "Support for Cyrillic ISO-8859-5.")) '("Cyrillic")) -;; KOI-8 staff +;; KOI-8 stuff (define-coding-system 'cyrillic-koi8 "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)." @@ -83,7 +83,7 @@ (documentation . "Support for Cyrillic KOI8-R.")) '("Cyrillic")) -;;; ALTERNATIVNYJ staff +;;; ALTERNATIVNYJ stuff (define-coding-system 'cyrillic-alternativnyj "ALTERNATIVNYJ 8-bit encoding for Cyrillic." @@ -107,6 +107,37 @@ (documentation . "Support for Cyrillic ALTERNATIVNYJ.")) '("Cyrillic")) +(define-coding-system 'koi8-u + "KOI8-U 8-bit encoding for Cyrillic (MIME: KOI8-U)" + :coding-type 'charset + :mnemonic ?U + :charset-list '(koi8-u) + :mime-charset 'koi8-u) + +(define-coding-system 'koi8-t + "KOI8-T 8-bit encoding for Cyrillic (MIME: KOI8-T)" + :coding-type 'charset + :mnemonic ?* + :charset-list '(koi8-t) + :mime-charset 'koi8-t) + +(define-coding-system 'windows-1251 + "windows-1251 8-bit encoding for Cyrillic (MIME: WINDOWS-1251)" + :coding-type 'charset + :mnemonic ?b + :charset-list '(windows-1251) + :mime-charset 'windows-1251) +(define-coding-system-alias 'cp1251 'windows-1251) + +(define-coding-system 'cp1125 + "cp1125 8-bit encoding for Cyrillic (MIME: CP1125)" + :coding-type 'charset + :mnemonic ?* + :charset-list '(cp1125)) +(define-coding-system-alias 'ruscii 'cp1125) +;; Original name for cp1125, says Serhii Hlodin <hlodin@lutsk.bank.gov.ua> +(define-coding-system-alias 'cp866u 'cp1125) + (provide 'cyrillic) ;;; cyrillic.el ends here |