# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1021390598 0
# Node ID 1e2fb9a9f29c5d780a8eb4bea26203ddffc7d5bd
# Parent  8921fa5b6ff9b90da94c8ee232e60eda143f5dc1
(cyrillic-iso-8bit, cyrillic-koi8)
(cyrillic-alternativnyj): Fix :mime-charset.
(cp878, cp866): New alias.

diff -r 8921fa5b6ff9 -r 1e2fb9a9f29c lisp/language/cyrillic.el
--- a/lisp/language/cyrillic.el	Tue May 14 13:03:45 2002 +0000
+++ b/lisp/language/cyrillic.el	Tue May 14 15:36:38 2002 +0000
@@ -39,7 +39,7 @@
   :coding-type 'charset
   :mnemonic ?5
   :charset-list '(iso-8859-5)
-  :plist '(mime-charset iso-8859-5))
+  :mime-charset 'iso-8859-5)
 
 (define-coding-system-alias 'iso-8859-5 'cyrillic-iso-8bit)
 
@@ -65,10 +65,11 @@
   ;; languages other than Russian will have to forgive us.
   :mnemonic ?R
   :charset-list '(koi8)
-  :plist '(mime-charset koi8-r))
+  :mime-charset 'koi8-r)
 
 (define-coding-system-alias 'koi8-r 'cyrillic-koi8)
 (define-coding-system-alias 'koi8 'cyrillic-koi8)
+(define-coding-system-alias 'cp878 'cyrillic-koi8)
 
 (set-language-info-alist
  "Cyrillic-KOI8" `((charset koi8)
@@ -88,9 +89,11 @@
   "ALTERNATIVNYJ 8-bit encoding for Cyrillic."
   :coding-type 'charset
   :mnemonic ?A
-  :charset-list '(alternativnyj))
+  :charset-list '(alternativnyj)
+  :mime-charset 'cp866)
 
 (define-coding-system-alias 'alternativnyj 'cyrillic-alternativnyj)
+(define-coding-system-alias 'cp866 'cyrillic-alternativnyj)
 
 (set-language-info-alist
  "Cyrillic-ALT" `((charset alternativnyj)