# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 894052303 0
# Node ID b8ebd3d021a421374e03a4b4bf4dc2ab83644853
# Parent  a770caf1f7c5222a519160fbc889b912d4a5c685
(setup-slovak-environment): Call latin-2's setup function.

diff -r a770caf1f7c5 -r b8ebd3d021a4 lisp/language/slovak.el
--- a/lisp/language/slovak.el	Fri May 01 19:51:27 1998 +0000
+++ b/lisp/language/slovak.el	Fri May 01 19:51:43 1998 +0000
@@ -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)