RT# 81692 Update deprecated syntax in a RT search call

[freeside.git] / FS / FS / TicketSystem.pm

diff --git a/FS/FS/TicketSystem.pm b/FS/FS/TicketSystem.pm
index c973c88..744bcde 100644 (file)
--- a/FS/FS/TicketSystem.pm
+++ b/FS/FS/TicketSystem.pm
@@ -409,7 +409,12 @@ sub _upgrade_data {
     my $groups = RT::Groups->new(RT->SystemUser);
     $groups->LimitToEnabled;
     $groups->LimitToSystemInternalGroups;
-    $groups->Limit(FIELD => 'Type', VALUE => 'Privileged', OPERATOR => '=');
+    $groups->Limit(
+      FIELD         => 'Name',
+      VALUE         => 'Privileged',
+      OPERATOR      => '=',
+      CASESENSITIVE => 0,
+    );
     my $group = $groups->First
       or die "No RT internal group found for Privileged users";
     my ($val, $msg) = $group->PrincipalObj->GrantRight(