From: Eli Zaretskii <eliz@gnu.org>
Date: Mon, 18 Dec 2000 12:36:36 +0000 (+0000)
Subject: (cp866-decode-table): New table.
X-Git-Tag: emacs-pretest-21.0.95~435
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=573191a15340f0aa45c9d9114a1a68c54a09a3ab;p=emacs.git

(cp866-decode-table): New table.
---

diff --git a/lisp/international/codepage.el b/lisp/international/codepage.el
index 65b2ce2c64b..340287446c4 100644
--- a/lisp/international/codepage.el
+++ b/lisp/international/codepage.el
@@ -376,6 +376,20 @@ character is generated by (make-char CHARSET OFFSET)."
 (setplist 'cp865-decode-table
 	  '(charset latin-iso8859-1 language "Latin-1" offset 160))
 
+;; Russian (Yes, another one!  This one's supposed to be used
+;; on Windows as the Russian OEM code page.)
+(defvar cp866-decode-table
+  [
+   255 240 nil nil 242 nil nil 244 nil nil nil nil nil nil 246 nil
+   128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143
+   144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159
+   160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175
+   223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238
+   252 241 nil nil 243 nil nil 245 nil nil nil nil nil nil 247 nil]
+  "Table for converting ISO-8859-5 characters into codepage 866 glyphs.")
+(setplist 'cp866-decode-table
+	  '(charset cyrillic-iso8859-5 language "Cyrillic-ISO" offset 160))
+
 ;; Greek (yes, another one!)
 (defvar cp869-decode-table
   [