Mercurial > emacs

diff lisp/language/slovak.el @ 21895:b8ebd3d021a4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(setup-slovak-environment): Call latin-2's setup function.
author Richard M. Stallman <rms@gnu.org>
date Fri, 01 May 1998 19:51:43 +0000
parents c0e398eea0bd
children 5fef9d1a7fc2
line wrap: on
line diff
--- 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)