X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Fetc%2Fupgrade%2F3.8-ical-extension.in;h=89e5191e757d447273cff7f388c16a22447969e5;hb=87a7b7029f3d71c7cbb625ec61f8e18ab3edb40d;hp=45b14a6ebe1e5eba6a1ef5e2630af337b290b348;hpb=0fb307c305e4bc2c9c27dc25a3308beae3a4d33c;p=freeside.git diff --git a/rt/etc/upgrade/3.8-ical-extension.in b/rt/etc/upgrade/3.8-ical-extension.in index 45b14a6eb..89e5191e7 100644 --- a/rt/etc/upgrade/3.8-ical-extension.in +++ b/rt/etc/upgrade/3.8-ical-extension.in @@ -3,7 +3,7 @@ # # COPYRIGHT: # -# This software is Copyright (c) 1996-2011 Best Practical Solutions, LLC +# This software is Copyright (c) 1996-2015 Best Practical Solutions, LLC # # # (Except where explicitly superseded by other copyright notices) @@ -58,14 +58,14 @@ RT::LoadConfig(); RT::Init(); use RT::Attributes; -my $attrs = RT::Attributes->new( $RT::SystemUser ); +my $attrs = RT::Attributes->new( RT->SystemUser ); $attrs->Limit(FIELD => 'ObjectType', OPERATOR=> '=', VALUE => 'RT::User'); $attrs->Limit(FIELD => 'Name', OPERATOR=> '=', VALUE => 'ical-auth-token'); while ( my $attr = $attrs->Next ) { my $uid = $attr->ObjectId; print "Processing auth token of user #". $uid ."...\n"; - my $user = RT::User->new( $RT::SystemUser ); + my $user = RT::User->new( RT->SystemUser ); $user->Load( $uid ); unless ( $user->id ) { print STDERR "\tERROR. Couldn't load user record\n";