From: Dave Love <fx@gnu.org>
Date: Mon, 14 Oct 2002 17:29:27 +0000 (+0000)
Subject: (cyrillic-alternativnyj): Remove
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~249
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d7a9db1c67a72a3f95151410928170232198e873;p=emacs.git

(cyrillic-alternativnyj): Remove
mime-charset.  Use alternativnj charset.
(cp866): Remove alias.  Define standalone.
---

diff --git a/lisp/language/cyrillic.el b/lisp/language/cyrillic.el
index 98f07e76d9a..604a49e8a4c 100644
--- a/lisp/language/cyrillic.el
+++ b/lisp/language/cyrillic.el
@@ -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