(setup-slovak-environment): Call latin-2's setup function.

1998-05-01 19:51:43 +00:00
parent fba04b4cd2
commit e1bd3c8dfc
1 changed files with 2 additions and 2 deletions
--- a/lisp/language/slovak.el
+++ b/lisp/language/slovak.el
@@ -33,8 +33,8 @@
 (defun setup-slovak-environment ()
  "Setup multilingual environment (MULE) for Slovak."
  (interactive)
-  (setup-8-bit-environment "Slovak" 'latin-iso8859-2 "slovak")
-  (load "latin-2"))
+  (funcall (get-language-info "Latin-2" 'setup-function))
+  (setq default-input-method "slovak"))

 (set-language-info-alist
 "Slovak" '((setup-function . setup-slovak-environment)