Debug needs an explicit package name for addToCleanup.

This commit is contained in:
Colin Kuskie 2011-10-19 13:11:23 -07:00
parent 19b6f9de12
commit 82bb59d40e
47 changed files with 99 additions and 99 deletions

View file

@ -75,7 +75,7 @@ my $workflow = WebGUI::Workflow->create($session,
mode => 'realtime',
},
);
addToCleanup($workflow);
WebGUI::Test->addToCleanup($workflow);
my $threshold = $workflow->addActivity('WebGUI::Workflow::Activity::NotifyAboutLowStock');
$threshold->set('className' , 'WebGUI::Activity::NotifyAboutLowStock');
@ -166,7 +166,7 @@ my $movieVarId = $movie_posters->setCollateral('variantsJSON', 'variantId', 'new
},
);
my $otherTag = WebGUI::VersionTag->getWorking($session);
addToCleanup($otherTag);
WebGUI::Test->addToCleanup($otherTag);
$otherTag->commit;
$threshold->set('warningLimit' , 10);

View file

@ -46,7 +46,7 @@ plan tests => 9; # Increment this number for each test you create
my $number = 'NL34567890';
my $user = WebGUI::User->new( $session, 'new' );
my $userId = $user->userId;
addToCleanup( $user );
WebGUI::Test->addToCleanup( $user );
# --- valid number ----------------
$return = 'VALID';
@ -94,7 +94,7 @@ sub createInstance {
} );
my $activity = $workflow->addActivity( 'WebGUI::Workflow::Activity::RecheckVATNumber' );
addToCleanup( $workflow );
WebGUI::Test->addToCleanup( $workflow );
my $instance = WebGUI::Workflow::Instance->create( $session, {
workflowId => $workflow->getId,