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

The new survey is here. Make sure to wg-reset your test instances to get the new DB schema.

Browse source
This commit is contained in:
Kaleb Murphy 2008-11-06 20:48:18 +00:00
commit 1dd08e25c9
24 changed files with 2330 additions and 1452 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='approved' and asset.state='published'
where Post.revisionDate > ? and assetData.status='archived' 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->archive if ($archiveIt);
$thread->unarchive if ($archiveIt);
}
$b->finish;
}