summaryrefslogtreecommitdiff
path: root/rt/etc/upgrade/3.9.2/content
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2015-07-26 15:41:26 -0700
committerIvan Kohler <ivan@freeside.biz>2015-07-26 15:41:26 -0700
commit9aee669886202be7035e6c6049fc71bc99dd3013 (patch)
tree2fd5bf6de74f3d99270587ffb1833e4188a6373d /rt/etc/upgrade/3.9.2/content
parentac20214d38d9af00430423f147b5a0e50751b050 (diff)
parent1add633372bdca3cc7163c2ce48363fed3984437 (diff)
Merge branch 'master' of git.freeside.biz:/home/git/freeside
Diffstat (limited to 'rt/etc/upgrade/3.9.2/content')
-rw-r--r--rt/etc/upgrade/3.9.2/content15
1 files changed, 9 insertions, 6 deletions
diff --git a/rt/etc/upgrade/3.9.2/content b/rt/etc/upgrade/3.9.2/content
index d0dbbfd0a..1851a9e99 100644
--- a/rt/etc/upgrade/3.9.2/content
+++ b/rt/etc/upgrade/3.9.2/content
@@ -1,7 +1,9 @@
-@Initial = (
+use strict;
+use warnings;
+
+our @Initial = (
sub {
- use strict;
- $RT::Logger->debug('Removing all delegated rights');
+ RT->Logger->debug('Removing all delegated rights');
my $acl = RT::ACL->new(RT->SystemUser);
$acl->Limit( CLAUSE => 'search',
@@ -20,7 +22,7 @@
my ( $ok, $msg ) = $ace->Delete();
if ( !$ok ) {
- $RT::Logger->warn(
+ RT->Logger->warn(
"Unable to delete ACE " . $ace->id . ": " . $msg );
}
}
@@ -28,14 +30,15 @@
my $groups = RT::Groups->new(RT->SystemUser);
$groups->Limit( FIELD => 'Domain',
OPERATOR => '=',
- VALUE => 'Personal'
+ VALUE => 'Personal',
+ CASESENSITIVE => 0,
);
while ( my $group = $groups->Next ) {
my $members = $group->MembersObj();
while ( my $member = $members->Next ) {
my ( $ok, $msg ) = $group->DeleteMember( $member->MemberId );
if ( !$ok ) {
- $RT::Logger->warn( "Unable to remove group member "
+ RT->Logger->warn( "Unable to remove group member "
. $member->id . ": "
. $msg );
}