From: mark <mark>
Date: Thu, 28 Jul 2011 22:04:54 +0000 (+0000)
Subject: fix spurious RT error when not changing language
X-Git-Tag: freeside_2_3_1~373
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=1b0cab3641a1cc3d497cbe4502dc3b33b13af74d;p=freeside.git

fix spurious RT error when not changing language
---

diff --git a/httemplate/pref/pref-process.html b/httemplate/pref/pref-process.html
index 4ff878fd7..974b96dc2 100644
--- a/httemplate/pref/pref-process.html
+++ b/httemplate/pref/pref-process.html
@@ -80,7 +80,9 @@ if ( !$error and ($FS::TicketSystem::system || '') eq 'RT_Internal' ) {
   my $UserObj = FS::TicketSystem->session('')->{'CurrentUser'}->UserObj;
   # Bypass RT ModifySelf ACL
   $UserObj->CurrentUser( RT::SystemUser );
-  my ($val, $msg) = $UserObj->SetLang($locale);
-  $error = $msg if !$val;
+  if ( $UserObj->Lang ne $locale ) {
+    my ($val, $msg) = $UserObj->SetLang($locale);
+    $error = $msg if !$val;
+  }
 }
 </%init>