Fix: Added appropriate workflow activities for new Calendar

This commit is contained in:
Doug Bell 2006-12-07 00:07:48 +00:00
parent a5c1cc7e90
commit c55feb8bcd
2 changed files with 8 additions and 2 deletions

View file

@ -78,6 +78,8 @@ sub execute {
my $self = shift;
$self->session->user({userId => 3});
### TODO: If we take more than a minute, return WAITING so that some
# other activity can run
my $ua = LWP::UserAgent->new(agent => "WebGUI");
my $dt = WebGUI::DateTime->new(time)->toMysql;
@ -288,7 +290,6 @@ sub execute {
if ($event)
{
$event->update($properties);
$event->requestCommit;
$updated++;
}
}
@ -296,7 +297,6 @@ sub execute {
{
my $calendar = WebGUI::Asset->newByDynamicClass($self->session,$feed->{assetId});
my $event = $calendar->addChild($properties);
$event->requestCommit;
$added++;
}