More instanciator cleanup.

This commit is contained in:
Colin Kuskie 2010-03-04 08:55:10 -08:00
parent 3d9006b643
commit d5dd260f32
2 changed files with 3 additions and 3 deletions

View file

@ -275,7 +275,7 @@ sub new {
}
if (! $assetId{$id}) {
$assetId{$id} = $properties->{assetId};
$asset{$id} = WebGUI::Asset::Wobject::DataForm->new($session, $properties->{assetId});
$asset{$id} = WebGUI::Asset::Wobject::DataForm->newById($session, $properties->{assetId});
}
$self->setFromHash($properties);
}

View file

@ -116,8 +116,8 @@ sub www_changeUrlSave {
$asset->update({url => $newUrl});
my $rs = $session->db->read("select revisionDate from assetData where assetId=? and revisionDate<>?",[$asset->getId, $asset->get("revisionDate")]);
while (my ($version) = $rs->array) {
my $old = WebGUI::Asset->new($session, $asset->getId, $asset->get("className"), $version);
$old->purgeRevision if defined $old;
my $old = eval { WebGUI::Asset->newById($session, $asset->getId, $version); };
$old->purgeRevision if ! Exception::Class->caught();
}
}