diff options
| author | Kenichi Handa <handa@m17n.org> | 1998-08-10 06:42:41 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1998-08-10 06:42:41 +0000 |
| commit | 45717142ef32a4e5af50a464bb16bebc23de18dd (patch) | |
| tree | c6615cbe433cf657f5239edb3fb6a3df0786c8c1 /lisp/language/cyril-util.el | |
| parent | ddb5c0419c10ae1dd7f471649f7146df7ff345ca (diff) | |
| download | emacs-45717142ef32a4e5af50a464bb16bebc23de18dd.tar.gz emacs-45717142ef32a4e5af50a464bb16bebc23de18dd.tar.bz2 emacs-45717142ef32a4e5af50a464bb16bebc23de18dd.zip | |
(setup-XXX-environment): Just call set-language-environment. If
they used to do some other jobs than what done by
set-language-environment, those jobs are done in
setup-XXX-environment-internal now.
Diffstat (limited to 'lisp/language/cyril-util.el')
| -rw-r--r-- | lisp/language/cyril-util.el | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/lisp/language/cyril-util.el b/lisp/language/cyril-util.el index 8aa51a04c51..4df69bcefee 100644 --- a/lisp/language/cyril-util.el +++ b/lisp/language/cyril-util.el @@ -27,23 +27,19 @@ (defun setup-cyrillic-iso-environment () "Setup multilingual environment (MULE) for Cyrillic ISO-8859-5 users." (interactive) - (setup-8-bit-environment "Cyrillic-ISO" 'cyrillic-iso8859-5 - "cyrillic-yawerty")) + (set-language-environment "Cyrillic-ISO")) ;;;###autoload (defun setup-cyrillic-koi8-environment () "Setup multilingual environment (MULE) for Cyrillic KOI8 users." (interactive) - (setup-8-bit-environment "Cyrillic-KOI8" 'cyrillic-iso8859-5 - "cyrillic-yawerty")) + (set-language-environment "Cyrillic-KOI8")) ;;;###autoload (defun setup-cyrillic-alternativnyj-environment () "Setup multilingual environment (MULE) for Cyrillic ALTERNATIVNYJ users." (interactive) - (setup-8-bit-environment "Cyrillic-ALT" 'cyrillic-iso8859-5 - "cyrillic-yawerty") - (setq coding-category-raw-text 'cyrillic-alternativnyj)) + (set-language-environment "Cyrillic-ALT")) ;;;###autoload (defun cyrillic-encode-koi8-r-char (char) |