Remove a duplicate subroutine and some syntax problems.

This commit is contained in:
Colin Kuskie 2009-05-21 15:13:26 +00:00
parent 946cf6e026
commit c6a0abe8c1

View file

@ -357,7 +357,7 @@ sub run {
return "error";
}
$status = eval { $activity->execute($object, $self) };
my $status = eval { $activity->execute($object, $self) };
if ($@) {
$self->session->errorHandler->error("Caught exception executing workflow activity ".$activity->getId." for instance ".$self->getId." which reported ".$@);
$self->set({lastStatus=>"error"}, 1);
@ -374,21 +374,6 @@ sub run {
#-------------------------------------------------------------------
=head2 getNextActivity
Returns the next activity object for this instance.
=cut
sub getNextActivity {
my $self = shift;
my $workflow = $self->getWorkflow;
my $activity = $workflow->getNextActivity($self->get("currentActivityId"));
return $activity;
}
#-------------------------------------------------------------------
=head2 getObject
Returns the object this workflow is being used on, or undef if it does not have a related object.