Fix patterns to be registered in composition-function-table.

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

diff --git a/lisp/language/slovak.el b/lisp/language/slovak.el
index d20438ad6d65cea5dd2f2d82961a97ebefa65449..f4b2a14374c497b7466078c886165e939f7673d6 100644 (file)
--- a/lisp/language/slovak.el
+++ b/lisp/language/slovak.el
@@ -1,10 +1,10 @@
-;;; slovak.el --- Support for Slovak -*- coding: iso-2022-7bit; -*-
+;;; slovak.el --- support for Slovak -*- coding: iso-2022-7bit; no-byte-compile: t -*-
 
-;; Copyright (C) 1998 Free Software Foundation.
+;; Copyright (C) 1998, 2001 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
 
 ;; This file is part of GNU Emacs.
@@ -30,11 +30,6 @@
 
 ;;; Code:
 
-(defun setup-slovak-environment ()
-  "Setup multilingual environment (MULE) for Slovak."
-  (interactive)
-  (set-language-environment "Slovak"))
-
 (set-language-info-alist
  "Slovak" '((charset . (ascii latin-iso8859-2))
            (coding-system . (iso-8859-2))
@@ -43,10 +38,15 @@
            (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