diff options
| author | Richard M. Stallman <[email protected]> | 1999-02-06 05:50:59 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1999-02-06 05:50:59 +0000 |
| commit | e09801420554b8403196b4828ea3400a5060153f (patch) | |
| tree | 51a00d9fd53d107600b3665dd525625cb207291e /lisp/language | |
| parent | 50842164698560653fe34c5bb6ff65ce978dd718 (diff) | |
(setup-slovenian-environment): New function.
("Slovenian"): New language environment.
Diffstat (limited to 'lisp/language')
| -rw-r--r-- | lisp/language/european.el | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/lisp/language/european.el b/lisp/language/european.el index d9428fbca8..3be974c79f 100644 --- a/lisp/language/european.el +++ b/lisp/language/european.el @@ -232,4 +232,24 @@ This language environment is almost the same as Latin-1, 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 |