aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/language/cyril-util.el27
1 files changed, 3 insertions, 24 deletions
diff --git a/lisp/language/cyril-util.el b/lisp/language/cyril-util.el
index c76d5f356bc..15c386febf0 100644
--- a/lisp/language/cyril-util.el
+++ b/lisp/language/cyril-util.el
@@ -25,35 +25,14 @@
25;;; Code: 25;;; Code:
26 26
27;;;###autoload 27;;;###autoload
28(defun setup-cyrillic-iso-environment () 28(defun setup-cyrillic-environment ()
29 "Setup multilingual environment (MULE) for Cyrillic ISO-8859-5 users." 29 "Setup multilingual environment (MULE) for Cyrillic users."
30 (interactive) 30 (interactive)
31 (setup-8-bit-environment 'cyrillic-iso8859-5 'cyrillic-iso-8bit 31 (setup-8-bit-environment 'cyrillic-iso8859-5 'cyrillic-iso-8bit
32 '("Cyrillic" . "quail-yawerty")) 32 '("Cyrillic" . "quail-yawerty"))
33 (setq primary-language "Cyrillic")) 33 (setq primary-language "Cyrillic"))
34 34
35;;;###autoload
36(defun setup-cyrillic-koi8-environment ()
37 "Setup multilingual environment for Cyrillic (KOI8-R) users."
38 (interactive)
39 (setup-8-bit-environment 'cyrillic-iso8859-5 'cyrillic-koi8
40 '("Cyrillic" . "quail-yawerty"))
41
42 (setq primary-language "Cyrillic"))
43
44;;;###autoload
45(defun setup-cyrillic-alternativnyj-environment ()
46 "Setup multilingual environment for Cyrillic (ALTERNATIVNYJ) users."
47 (interactive)
48 (setup-8-bit-environment 'cyrillic-iso8859-5 'cyrillic-alternativnyj
49 '("Cyrillic" . "quail-yawerty"))
50
51 (setq primary-language "Cyrillic"))
52
53;; 35;;
54(provide 'language/cyril-util) 36(provide 'cyril-util)
55 37
56;;; Local Variables:
57;;; generated-autoload-file: "../loaddefs.el"
58;;; End:
59;;; cyril-util.el ends here 38;;; cyril-util.el ends here