Mercurial > emacs
changeset 89204:e7cc92cb7ad5
(cyrillic-alternativnyj): Remove
mime-charset. Use alternativnj charset.
(cp866): Remove alias. Define standalone.
author | Dave Love <fx@gnu.org> |
---|---|
date | Mon, 14 Oct 2002 17:29:27 +0000 |
parents | 61d0db65f8e4 |
children | b1be7f87c9d9 |
files | lisp/language/cyrillic.el |
diffstat | 1 files changed, 9 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/language/cyrillic.el Mon Oct 14 17:13:49 2002 +0000 +++ b/lisp/language/cyrillic.el Mon Oct 14 17:29:27 2002 +0000 @@ -2,6 +2,7 @@ ;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN. ;; Licensed to the Free Software Foundation. +;; Copyright (C) 2002 Free Software Foundation, Inc. ;; Keywords: multilingual, Cyrillic @@ -89,11 +90,9 @@ "ALTERNATIVNYJ 8-bit encoding for Cyrillic." :coding-type 'charset :mnemonic ?A - :charset-list '(alternativnyj) - :mime-charset 'cp866) + :charset-list '(alternativnyj)) (define-coding-system-alias 'alternativnyj 'cyrillic-alternativnyj) -(define-coding-system-alias 'cp866 'cyrillic-alternativnyj) (set-language-info-alist "Cyrillic-ALT" `((charset alternativnyj) @@ -107,6 +106,13 @@ (documentation . "Support for Cyrillic ALTERNATIVNYJ.")) '("Cyrillic")) +(define-coding-system 'cp866 + "CP866 encoding for Cyrillic." + :coding-type 'charset + :mnemonic ?* + :charset-list '(ibm866) + :mime-charset 'cp866) + (define-coding-system 'koi8-u "KOI8-U 8-bit encoding for Cyrillic (MIME: KOI8-U)" :coding-type 'charset