- Added a --skipDelete option to upgrade.pl
- rfe: Approvers don't need to approve own changes fixed a rare bug that could occur in archiving old threads
This commit is contained in:
parent
8ec18c957f
commit
61b70325f2
4 changed files with 37 additions and 18 deletions
|
|
@ -73,6 +73,7 @@ sub execute {
|
|||
my $a = $self->session->db->read("select assetId from asset where className='WebGUI::Asset::Wobject::Collaboration'");
|
||||
while (my ($assetId) = $a->array) {
|
||||
my $cs = WebGUI::Asset->new($self->session, $assetId, "WebGUI::Asset::Wobject::Collaboration");
|
||||
next unless defined $cs;
|
||||
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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue