Merge from emacs--rel--22

[gnu-emacs] / lisp / language / slovak.el

diff --git a/lisp/language/slovak.el b/lisp/language/slovak.el
index e33ade8b25767af6e1a0b9ce755a434db860651f..6b7fa1f6653cd490c47bf4100a864e33a20c715a 100644 (file)
--- a/lisp/language/slovak.el
+++ b/lisp/language/slovak.el
@@ -1,13 +1,29 @@
-;;; slovak.el --- Support for Slovak
+;;; slovak.el --- support for Slovak -*- coding: iso-2022-7bit; no-byte-compile: t -*-
 
-;; Copyright (C) 1998 Free Software Foundation.
+;; Copyright (C) 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007
+;;   Free Software Foundation.
 
 ;; Authors:    Tibor \e,B)\e(Bimko <tibor.simko@fmph.uniba.sk>,
-;;             Milan Zamazal <pdm@fi.muni.cz>
-;; Maintainer: Milan Zamazal <pdm@fi.muni.cz>
+;;             Milan Zamazal <pdm@zamazal.org>
+;; Maintainer: Pavel Jan\e,Am\e(Bk <Pavel@Janik.cz>
 ;; Keywords: multilingual, Slovak
 
-;; Copying and warranty: GNU General Public License, version 2
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 ;;; Commentary:
 
@@ -15,19 +31,23 @@
 
 ;;; Code:
 
-(defun setup-slovak-environment ()
-  "Setup multilingual environment (MULE) for Slovak."
-  (interactive)
-  (setup-8-bit-environment "Slovak" 'latin-iso8859-2 'iso-8859-2)
-  (load "latin-2"))
-
 (set-language-info-alist
- "Slovak" '((setup-function . setup-slovak-environment)
-           (charset . (ascii latin-iso8859-2))
-           (coding-system . (iso-latin-2))
+ "Slovak" '((charset . (ascii latin-iso8859-2))
+           (coding-system . (iso-8859-2))
+           (coding-priority . (iso-8859-2))
+           (nonascii-translation . latin-iso8859-2)
+           (input-method . "slovak")
+           (unibyte-syntax . "latin-2")
+           (unibyte-display . iso-8859-2)
+           (tutorial . "TUTORIAL.sk")
            (sample-text . "Prajeme V\e,Ba\e(Bm pr\e,Bm\e(Bjemn\e,B}\e(B de\e,Br\e(B!")
-           (documentation . t)))
+           (documentation . "\
+This language environment is almost the same as Latin-2,
+but sets the default input method to \"slovak\",
+and selects the Slovak tutorial."))
+ '("European"))
 
 (provide 'slovak)
 
-;; slovak.el ends here
+;;; arch-tag: 1bae098a-33b2-4426-8c29-59e44fe05484
+;;; slovak.el ends here