Add a new function `svg-embed'

[gnu-emacs] / lisp / language / european.el

diff --git a/lisp/language/european.el b/lisp/language/european.el
index a939719ec426614b19e480e3c7a4d921956202eb..11c5e03c97f779c019558159a73034ff71b3a0b2 100644 (file)
--- a/lisp/language/european.el
+++ b/lisp/language/european.el
@@ -614,6 +614,28 @@ method and applying Turkish case rules for the characters i, I, ı, İ.")))
            (documentation . "Support for Brazilian Portuguese."))
  '("European"))
 
+(set-language-info-alist
+ "Catalan" '((charset iso-8859-1)
+            (coding-system iso-8859-1 iso-8859-15)
+            (coding-priority iso-8859-1)
+            (input-method . "catalan-prefix")
+            (nonascii-translation . iso-8859-1)
+            (unibyte-display . iso-8859-1)
+            (setup-function
+             . (lambda ()
+                 (modify-syntax-entry ?· "w" (standard-syntax-table))))
+            (exit-function
+             . (lambda ()
+                 (modify-syntax-entry ?· "_" (standard-syntax-table))))
+            (sample-text . "\
+Catalan (Català)  Avui demà i ahir s'esfullarà una rosa.")
+            (documentation . "\
+This language environment uses the ISO-8859-1 character set,
+sets the default input method to \"catalan-prefix\", and sets
+the syntax of the middle dot character `·' to word."))
+  '("European"))
+
+
 \f
 (define-coding-system 'mac-roman
   "Mac Roman Encoding (MIME:MACINTOSH)."