diff options
author | Dave Love <[email protected]> | 2003-02-14 12:55:08 +0000 |
---|---|---|
committer | Dave Love <[email protected]> | 2003-02-14 12:55:08 +0000 |
commit | 765093893d6dd491ae20fe2a10c67c4e6b664a5b (patch) | |
tree | 4695dcbf8bb72b5c6bb38084ec7ebe652956958b /lisp/language/cyrillic.el | |
parent | 83930535822b5a44809c0e3969f03c9ebdcf2ce2 (diff) |
("Cyrillic-KOI8"): Fix input-method.
("Russian"): New.
("Bulgarian"): Add tutorial.
Diffstat (limited to 'lisp/language/cyrillic.el')
-rw-r--r-- | lisp/language/cyrillic.el | 35 |
1 files changed, 26 insertions, 9 deletions
diff --git a/lisp/language/cyrillic.el b/lisp/language/cyrillic.el index b4135c68bf..742da4fc5a 100644 --- a/lisp/language/cyrillic.el +++ b/lisp/language/cyrillic.el @@ -2,7 +2,7 @@ ;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN. ;; Licensed to the Free Software Foundation. -;; Copyright (C) 2001, 2002 Free Software Foundation, Inc. +;; Copyright (C) 2001, 2002, 2003 Free Software Foundation, Inc. ;; Author: Kenichi Handa <[email protected]> ;; Keywords: multilingual, Cyrillic, i18n @@ -216,13 +216,29 @@ This works whether or not the table is Unicode-based or 'translation-table)) (coding-system cyrillic-koi8) (coding-priority cyrillic-koi8 cyrillic-iso-8bit) - (input-method . "cyrillic-jcuken") + (input-method . "russian-typewriter") (features cyril-util) (unibyte-display . cyrillic-koi8) (sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!") (documentation . "Support for Cyrillic KOI8-R.")) '("Cyrillic")) +(set-language-info-alist + "Russian" `((charset cyrillic-iso8859-5) + (nonascii-translation + . ,(get 'cyrillic-koi8-r-nonascii-translation-table + 'translation-table)) + (coding-system cyrillic-koi8) + (coding-priority cyrillic-koi8 cyrillic-iso-8bit) + (input-method . "russian-computer") + (features cyril-util) + (unibyte-display . cyrillic-koi8) + (sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!") + (documentation . "\ +Support for Russian using koi8-r and the russian-computer input method.") + (tutorial . "TUTORIAL.ru")) + '("Cyrillic")) + (defvar cyrillic-koi8-u-decode-table [ @@ -436,12 +452,12 @@ This works whether or not the table is Unicode-based or (set-language-info-alist "Tajik" `((coding-system cyrillic-koi8-t) - (coding-priority cyrillic-koi8-t) - (nonascii-translation - . ,(get 'decode-koi8-t 'translation-table)) - (input-method . "russian-typewriter") ; fixme? - (features code-pages) - (documentation . "Support for Tajik using KOI8-T.")) + (coding-priority cyrillic-koi8-t) + (nonascii-translation + . ,(get 'decode-koi8-t 'translation-table)) + (input-method . "russian-typewriter") ; fixme? + (features code-pages) + (documentation . "Support for Tajik using KOI8-T.")) '("Cyrillic")) (set-language-info-alist @@ -452,7 +468,8 @@ This works whether or not the table is Unicode-based or (input-method . "bulgarian-bds") (features code-pages) (documentation - . "Support for Bulgarian with windows-1251 character set.")) + . "Support for Bulgarian with windows-1251 character set.") + (tutorial . "TUTORIAL.bg")) '("Cyrillic")) (set-language-info-alist |