more bug fixes

This commit is contained in:
JT Smith 2005-08-12 16:37:23 +00:00
parent b21461d50c
commit 469950a1ef
4 changed files with 12 additions and 3 deletions

View file

@ -298,6 +298,7 @@ sub addAssetVersioning {
$sth = WebGUI::SQL->read("select olderVersions from FileAsset");
while (my ($old) = $sth->array) {
foreach my $storageId (split("\n",$old)) {
next unless ($storageId);
WebGUI::Storage->get($storageId)->delete;
}
}