newByDynamicClass changed to newById

This commit is contained in:
Colin Kuskie 2009-12-27 19:08:15 -08:00
parent 0fd922daed
commit 49bd7f5032
41 changed files with 94 additions and 94 deletions

View file

@ -45,7 +45,7 @@ sub process {
my $t = ($session->errorHandler->canShowPerformanceIndicators()) ? [Time::HiRes::gettimeofday()] : undef;
my $asset;
if ($type eq 'assetId') {
$asset = WebGUI::Asset->newByDynamicClass($session, $identifier);
$asset = WebGUI::Asset->newById($session, $identifier);
}
else {
$asset = WebGUI::Asset->newByUrl($session,$identifier);

View file

@ -42,7 +42,7 @@ sub process {
my $children = $asset->getLineage(["children"]);
#randomize;
my $randomAssetId = $children->[int(rand(scalar(@{$children})))];
my $randomAsset = WebGUI::Asset->newByDynamicClass($session,$randomAssetId);
my $randomAsset = WebGUI::Asset->newById($session,$randomAssetId);
if (defined $randomAsset) {
if ($randomAsset->canView) {
$randomAsset->toggleToolbar;