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

Backing out Survey for now

Browse source
This commit is contained in:
Graham Knop 2008-11-12 02:40:27 +00:00
parent 4c546d312f
commit 151e705286
25 changed files with 2519 additions and 3365 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Workflow/Activity/ArchiveOldThreads.pm
View file

@ -78,7 +78,7 @@ sub execute {
my $archiveDate = $epoch - $cs->get("archiveAfter");
my $sql = "select asset.assetId, assetData.revisionDate from Post left join asset on asset.assetId=Post.assetId
left join assetData on Post.assetId=assetData.assetId and Post.revisionDate=assetData.revisionDate
where Post.revisionDate > ? and assetData.status='archived' and asset.state='published'
where Post.revisionDate<? and assetData.status='approved' and asset.state='published'
and Post.threadId=Post.assetId and asset.lineage like ?";
my $b = $self->session->db->read($sql,[$archiveDate, $cs->get("lineage").'%']);
while (my ($id, $version) = $b->array) {
@ -87,7 +87,7 @@ sub execute {
foreach my $post (@{$thread->getPosts}) {
$archiveIt = 0 if (defined $post && $post->get("revisionDate") > $archiveDate);
}
$thread->unarchive if ($archiveIt);
$thread->archive if ($archiveIt);
}
$b->finish;
}