code.delx.au - gnu-emacs/blob - lisp/language/slovak.el

   1 ;;; slovak.el --- Support for Slovak -*- coding: iso-2022-7bit; -*-
   2
   3 ;; Copyright (C) 1998 Free Software Foundation.
   4
   5 ;; Authors:    Tibor \e,B)\e(Bimko <tibor.simko@fmph.uniba.sk>,
   6 ;;             Milan Zamazal <pdm@fi.muni.cz>
   7 ;; Maintainer: Milan Zamazal <pdm@fi.muni.cz>
   8 ;; Keywords: multilingual, Slovak
   9
  10 ;; This file is part of GNU Emacs.
  11
  12 ;; GNU Emacs is free software; you can redistribute it and/or modify
  13 ;; it under the terms of the GNU General Public License as published by
  14 ;; the Free Software Foundation; either version 2, or (at your option)
  15 ;; any later version.
  16
  17 ;; GNU Emacs is distributed in the hope that it will be useful,
  18 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 ;; GNU General Public License for more details.
  21
  22 ;; You should have received a copy of the GNU General Public License
  23 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
  24 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  25 ;; Boston, MA 02111-1307, USA.
  26
  27 ;;; Commentary:
  28
  29 ;; Slovak ISO 8859-2 environment.
  30
  31 ;;; Code:
  32
  33 (defun setup-slovak-environment ()
  34   "Setup multilingual environment (MULE) for Slovak."
  35   (interactive)
  36   (set-language-environment "Slovak"))
  37
  38 (set-language-info-alist
  39  "Slovak" '((charset . (ascii latin-iso8859-2))
  40             (coding-system . (iso-8859-2))
  41             (coding-priority . (iso-8859-2))
  42             (nonascii-translation . latin-iso8859-2)
  43             (input-method . "slovak")
  44             (unibyte-syntax . "latin-2")
  45             (unibyte-display . iso-8859-2)
  46             (sample-text . "Prajeme V\e,Ba\e(Bm pr\e,Bm\e(Bjemn\e,B}\e(B de\e,Br\e(B!")
  47             (documentation . t))
  48  '("European"))
  49
  50 (provide 'slovak)
  51
  52 ;; slovak.el ends here