changed reset to rerun in Test::Activity

This commit is contained in:
daviddelikat 2009-11-18 09:45:58 -06:00
parent 816bc2c49f
commit f12b0751e6
2 changed files with 18 additions and 4 deletions

View file

@ -368,7 +368,7 @@ $sub2->update({
my $sub2Id = $sub2->getId;
$session->db->write('update assetData set lastModified = ' . $newDate . ' where assetId = "' . $sub2Id . '"' );
$cleanupSubmissions->rerun;
$cleanupSubmissions->reset;
is($cleanupSubmissions->run, 'complete', 'cleanup complete');
is($cleanupSubmissions->run, 'done', 'cleanup done');

View file

@ -22,12 +22,14 @@ my $instance = WebGUI::Test::Activity->create( $session, 'WebGUI::Workflow::Acti
is( $instance->run, 'complete', 'activity complete' );
is( $instance->run, 'done', 'activity done' );
$instance->rerun;
$instance->reset;
is( $instance->run, 'complete', 'activity complete' );
is( $instance->run, 'done', 'activity done' );
$instance->delete;
=head create
=head methods
=head2 create
=params
@ -75,11 +77,23 @@ sub create {
workflow => $workflow }, __PACKAGE__;
}
=head2 run
calls run on the instance of the workflow
=cut
sub run {
return $_[0]{instance}->run;
}
sub rerun {
=head2 reset
creates a new instance of the workflow so that it can be re-run
=cut
sub reset {
my $self = shift;
my $session = $self->{session};
$self->{instance} = WebGUI::Workflow::Instance->create($session,