summaryrefslogtreecommitdiff
path: root/lisp/language/czech.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1998-05-01 19:51:27 +0000
committerRichard M. Stallman <rms@gnu.org>1998-05-01 19:51:27 +0000
commitfba04b4cd2f60afda21f4ca418b9cfc8c1c3843d (patch)
tree13c8f901f4300144e0a23ee8a0d4babf42c204bb /lisp/language/czech.el
parent23c815141ca2063bd97a337df57f36960808691a (diff)
downloademacs-fba04b4cd2f60afda21f4ca418b9cfc8c1c3843d.tar.gz
emacs-fba04b4cd2f60afda21f4ca418b9cfc8c1c3843d.tar.bz2
emacs-fba04b4cd2f60afda21f4ca418b9cfc8c1c3843d.zip
(setup-czech-environment): Call latin-2's setup function.
Diffstat (limited to 'lisp/language/czech.el')
-rw-r--r--lisp/language/czech.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/language/czech.el b/lisp/language/czech.el
index 02708ecf59d..69de792330f 100644
--- a/lisp/language/czech.el
+++ b/lisp/language/czech.el
@@ -31,8 +31,8 @@
(defun setup-czech-environment ()
"Setup multilingual environment (MULE) for Czech."
(interactive)
- (setup-8-bit-environment "Czech" 'latin-iso8859-2 "czech")
- (load "latin-2"))
+ (funcall (get-language-info "Latin-2" 'setup-function))
+ (setq default-input-method "czech"))
(set-language-info-alist
"Czech" '((setup-function . setup-czech-environment)