("French"): New language environment.

diff --git a/lisp/language/european.el b/lisp/language/european.el
index 774514ad77f0902dce69027fa87de1d4196d1743..92662b10d761700ef2330546fc4dbe75801077c1 100644 (file)
--- a/lisp/language/european.el
+++ b/lisp/language/european.el
@@ -266,6 +266,21 @@ This language environment is almost the same as Latin-1,
 but the default input method is set to \"german-postfix\"."))
  '("European"))
 
+(set-language-info-alist
+ "French" '((tutorial . "TUTORIAL.fr")
+           (charset ascii latin-iso8859-1)
+           (coding-system iso-latin-1)
+           (coding-priority iso-latin-1)
+           (nonascii-translation . latin-iso8859-1)
+           (unibyte-syntax . "latin-1")
+           (unibyte-display . iso-latin-1)
+           (input-method . "latin-1-prefix")
+           (sample-text . "French (Fran\e,Ag\e(Bais)     Bonjour, Salut")
+           (documentation . "\
+This language environment is almost the same as Latin-1,
+but the tutorial is set to \"TUTORIAL.fr\"."))
+ '("European"))
+
 (set-language-info-alist
  "Slovenian" '((charset . (ascii latin-iso8859-2))
              (coding-system . (iso-8859-2))