From 1b0cab3641a1cc3d497cbe4502dc3b33b13af74d Mon Sep 17 00:00:00 2001
From: mark <mark>
Date: Thu, 28 Jul 2011 22:04:54 +0000
Subject: [PATCH] fix spurious RT error when not changing language

---
 httemplate/pref/pref-process.html | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

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>
-- 
2.11.0