more bug fixes

This commit is contained in:
JT Smith 2005-08-18 19:20:08 +00:00
parent c456b708de
commit 8664a34f1e
7 changed files with 16 additions and 9 deletions

View file

@ -22,7 +22,7 @@ sub process {
if ($offset ne "") {
my $epoch = time()-(86400*$offset);
my $sth = WebGUI::SQL->read("select asset.assetId,asset.className,max(assetData.revisionDate) from asset left join assetData on
asset.assetId=assetData.assetId where assetData.endDate<".$epoch." and assetData.status<>'pending' group by asset.assetData");
asset.assetId=assetData.assetId where assetData.endDate<".$epoch." group by assetData.assetId");
while (my ($assetId, $class, $version) = $sth->array) {
my $asset = WebGUI::Asset->new($assetId,$class,$version);
$asset->trash;