rt/etc/upgrade/4.0.0rc7/content

   1 @Initial = (
   2     sub {
   3         $RT::Logger->debug("Going to set lifecycle for approvals");
   4
   5         my $queue = RT::Queue->new( RT->SystemUser );
   6         $queue->Load('___Approvals');
   7         unless ( $queue->id ) {
   8             $RT::Logger->warning("There is no ___Approvals queue in the DB");
   9             return 1;
  10         }
  11
  12         return 1 if $queue->Lifecycle->Name eq 'approvals';
  13
  14         my ($status, $msg) = $queue->SetLifecycle('approvals');
  15         unless ( $status ) {
  16             $RT::Logger->error("Couldn't set lifecycle for '___Approvals' queue: $msg");
  17             return 0;
  18         }
  19         return 1;
  20     },
  21 );