oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

a bunch of bug fixes and tweaks related to workflow/versioning

Browse source
This commit is contained in:
JT Smith 2006-03-23 16:56:08 +00:00
parent f73b2996da
commit 985417afd3
9 changed files with 38 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/WebGUI/Workflow/Activity/SendQueuedMailMessages.pm
View file

@ -69,6 +69,7 @@ See WebGUI::Workflow::Activity::execute() for details.
sub execute {
my $self = shift;
my $start = time();
foreach my $id (@{WebGUI::Mail::Send->getMessageIdsInQueue($self->session)}) {
my $message = WebGUI::Mail::Send->retrieve($self->session, $id);
if (defined $message) {
@ -77,6 +78,8 @@ sub execute {
$message->queue;
}
}
# just in case there are a lot of messages, we should release after a minutes worth of sending
last if (time() > $start + 60);
}
return $self->COMPLETE;
}