diff lisp/language/czech.el @ 21196:0ad514a44245

Initial revision
author Richard M. Stallman <rms@gnu.org>
date Tue, 17 Mar 1998 05:49:29 +0000
parents
children 889e8341a01d
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/language/czech.el	Tue Mar 17 05:49:29 1998 +0000
@@ -0,0 +1,33 @@
+;;; czech.el -- support for Czech
+
+;; Copyright (C) 1998 Free Software Foundation.
+
+;; Author:     Milan Zamazal <pdm@fi.muni.cz>
+;; Maintainer: Milan Zamazal <pdm@fi.muni.cz>
+;; Keywords: multilingual, Czech
+
+;; Copying and warranty: GNU General Public License, version 2
+
+;;; Commentary:
+
+;; Czech ISO 8859-2 environment.
+
+;;; Code:
+
+(defun setup-czech-environment ()
+  "Setup multilingual environment (MULE) for Czech."
+  (interactive)
+  (setup-8-bit-environment "Czech" 'latin-iso8859-2 'iso-8859-2)
+  (load "latin-2"))
+
+(set-language-info-alist
+ "Czech" '((setup-function . setup-czech-environment)
+	   (charset . (ascii latin-iso8859-2))
+	   (coding-system . (iso-8859-2))
+	   (tutorial . "TUTORIAL.cz")
+	   (sample-text . "P,Bx(Bejeme v,Ba(Bm hezk,Bi(B r,Ba(Bno!")
+	   (documentation . t)))
+
+(provide 'czech)
+
+;; czech.el ends here