diff options
| author | Richard M. Stallman | 1998-05-01 19:51:27 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-05-01 19:51:27 +0000 |
| commit | fba04b4cd2f60afda21f4ca418b9cfc8c1c3843d (patch) | |
| tree | 13c8f901f4300144e0a23ee8a0d4babf42c204bb | |
| parent | 23c815141ca2063bd97a337df57f36960808691a (diff) | |
| download | emacs-fba04b4cd2f60afda21f4ca418b9cfc8c1c3843d.tar.gz emacs-fba04b4cd2f60afda21f4ca418b9cfc8c1c3843d.zip | |
(setup-czech-environment): Call latin-2's setup function.
| -rw-r--r-- | lisp/language/czech.el | 4 |
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 @@ | |||
| 31 | (defun setup-czech-environment () | 31 | (defun setup-czech-environment () |
| 32 | "Setup multilingual environment (MULE) for Czech." | 32 | "Setup multilingual environment (MULE) for Czech." |
| 33 | (interactive) | 33 | (interactive) |
| 34 | (setup-8-bit-environment "Czech" 'latin-iso8859-2 "czech") | 34 | (funcall (get-language-info "Latin-2" 'setup-function)) |
| 35 | (load "latin-2")) | 35 | (setq default-input-method "czech")) |
| 36 | 36 | ||
| 37 | (set-language-info-alist | 37 | (set-language-info-alist |
| 38 | "Czech" '((setup-function . setup-czech-environment) | 38 | "Czech" '((setup-function . setup-czech-environment) |