From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 1 May 1998 19:51:43 +0000 (+0000)
Subject: (setup-slovak-environment): Call latin-2's setup function.
X-Git-Tag: emacs-20.3~1182
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e1bd3c8dfcc8a2b8b5da7e4561d661fd2a70558d;p=emacs.git

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

diff --git a/lisp/language/slovak.el b/lisp/language/slovak.el
index 7cd5024b82a..b944ed80ffc 100644
--- 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)