("Swedish"): New set-language-info-alist call.

diff --git a/lisp/language/european.el b/lisp/language/european.el
index 7944b2b00166310cae61b0068e0e797a24941a38..5928c299c9b1f960bcc18ce22dc6a9aa21af364a 100644 (file)
--- a/lisp/language/european.el
+++ b/lisp/language/european.el
@@ -391,6 +391,18 @@ but it selects the Dutch tutorial and input method."))
             (features code-pages)
             (documentation . "Support for Latvian."))
  '("European"))
+
+(set-language-info-alist
+ "Swedish" '((tutorial . "TUTORIAL.se")
+           (charset ascii latin-iso8859-1)
+           (coding-system iso-latin-1)
+           (coding-priority iso-latin-1)
+           (nonascii-translation . iso-8859-1)
+           (unibyte-syntax . "latin-1")
+           (unibyte-display . iso-latin-1)
+           (sample-text . "Goddag Hej")
+           (documentation . "Support for Swedish"))
+ '("European"))
 \f
 ;; Definitions for the Mac Roman character sets and coding system.
 ;; The Mac Roman encoding uses all 128 code points in the range 128 to