Mercurial > emacs

changeset 24269:a29550b1d150

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(setup-slovenian-environment): New function. ("Slovenian"): New language environment.
author Richard M. Stallman <rms@gnu.org>
date Sat, 06 Feb 1999 05:50:59 +0000
parents 17b13a968841
children 02ae21f066ec
files lisp/language/european.el
diffstat 1 files changed, 20 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/european.el	Sat Feb 06 05:12:54 1999 +0000
+++ b/lisp/language/european.el	Sat Feb 06 05:50:59 1999 +0000
@@ -232,4 +232,24 @@
 but default input method is set to \"german-postfix\"."))
  '("European"))
 
+(defun setup-slovenian-environment ()
+  "Setup multilingual environment (MULE) for Slovenian."
+  (interactive)
+  (set-language-environment "Slovenian"))
+
+(set-language-info-alist
+ "Slovenian" '((charset . (ascii latin-iso8859-2))
+	      (coding-system . (iso-8859-2))
+	      (coding-priority . (iso-8859-2))
+	      (nonascii-translation . latin-iso8859-2)
+	      (input-method . "latin-2-postfix")
+	      (unibyte-syntax . "latin-2")
+	      (unibyte-display . iso-8859-2)
+	      (tutorial . "TUTORIAL.sl")
+	      (sample-text . ",B.(Belimo vam uspe,B9(Ben dan!")
+	      (documentation . t))
+ '("European"))
+
+(provide 'slovenian)
+
 ;;; european.el ends here