Mercurial > emacs
changeset 18307:fbc8c1765592
Provide cyril-util nstead of language/cyril-util.
(setup-cyrillic-iso-environment,
setup-cyrillic-koi8-environment,
setup-cyrillic-alternativnyj-environment): Deleted.
(setup-cyrillic-environment): New function.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Wed, 18 Jun 1997 13:02:11 +0000 |
| parents | 6148a6f19ded |
| children | b8622afb8a6e |
| files | lisp/language/cyril-util.el |
| diffstat | 1 files changed, 4 insertions(+), 25 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/language/cyril-util.el Wed Jun 18 13:00:03 1997 +0000 +++ b/lisp/language/cyril-util.el Wed Jun 18 13:02:11 1997 +0000 @@ -25,35 +25,14 @@ ;;; Code: ;;;###autoload -(defun setup-cyrillic-iso-environment () - "Setup multilingual environment (MULE) for Cyrillic ISO-8859-5 users." +(defun setup-cyrillic-environment () + "Setup multilingual environment (MULE) for Cyrillic users." (interactive) (setup-8-bit-environment 'cyrillic-iso8859-5 'cyrillic-iso-8bit '("Cyrillic" . "quail-yawerty")) (setq primary-language "Cyrillic")) -;;;###autoload -(defun setup-cyrillic-koi8-environment () - "Setup multilingual environment for Cyrillic (KOI8-R) users." - (interactive) - (setup-8-bit-environment 'cyrillic-iso8859-5 'cyrillic-koi8 - '("Cyrillic" . "quail-yawerty")) - - (setq primary-language "Cyrillic")) +;; +(provide 'cyril-util) -;;;###autoload -(defun setup-cyrillic-alternativnyj-environment () - "Setup multilingual environment for Cyrillic (ALTERNATIVNYJ) users." - (interactive) - (setup-8-bit-environment 'cyrillic-iso8859-5 'cyrillic-alternativnyj - '("Cyrillic" . "quail-yawerty")) - - (setq primary-language "Cyrillic")) - -;; -(provide 'language/cyril-util) - -;;; Local Variables: -;;; generated-autoload-file: "../loaddefs.el" -;;; End: ;;; cyril-util.el ends here