From: Sven Schöling <s.schoeling@linet-services.de>
Date: Fri, 24 Feb 2012 11:48:41 +0000 (+0100)
Subject: Merge branch 'master' of vc.linet-services.de:public/lx-office-erp
X-Git-Tag: release-2.7.0~11
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/b948bb619c8086b8f05aac962d44d075aea17822?hp=06cb6b127be7185927c6a3b32d16295d55e162ea

Merge branch 'master' of vc.linet-services.de:public/lx-office-erp
---

diff --git a/SL/Locale.pm b/SL/Locale.pm
index bb95e7309..24131378f 100644
--- a/SL/Locale.pm
+++ b/SL/Locale.pm
@@ -232,8 +232,8 @@ sub lang_to_locale {
 
   my $requested_locale;
   $requested_locale = 'de' if $requested_lang =~ m/^_(de|deu|ger)/i;
-  $requested_locale = 'fr' if $requested_lang =~ m/^_(en|uk|us|gr)/i;
-  $requested_locale = 'en' if $requested_lang =~ m/^_fr/i;
+  $requested_locale = 'en' if $requested_lang =~ m/^_(en|uk|us|gr)/i;
+  $requested_locale = 'fr' if $requested_lang =~ m/^_fr/i;
   $requested_locale ||= 'de';
 
   return $requested_locale;
diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 5050e6aa2..022f039ee 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -962,6 +962,9 @@ sub edit_e_mail {
     $form->{"email"} = $form->{"cp_email"} if $form->{"cp_email"};
   }
 
+  $form->{language} = $form->get_template_language(\%myconfig);
+  $form->{language} = "_" . $form->{language} if $form->{language};
+
   my $title = $locale->text('E-mail') . " " . $form->get_formname_translation();
 
   $form->{oldmedia} = $form->{media};