oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

first round of Perl::Critic cleanups. Do not use return undef, use a bare return instead

Browse source
This commit is contained in:
Colin Kuskie 2007-12-05 00:30:43 +00:00
parent 75041656ee
commit 96178fd70c
92 changed files with 209 additions and 209 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI/Macro/AdSpace.pm
View file

@ -37,7 +37,7 @@ sub process {
return "[AD:".$name."]";
}
my $adSpace = WebGUI::AdSpace->newByName($session, $name);
return undef unless defined $adSpace;
return unless defined $adSpace;
return $adSpace->displayImpression;
}

2
lib/WebGUI/Macro/AssetProxy.pm
View file

@ -50,7 +50,7 @@ sub process {
$output .= "AssetProxy:".Time::HiRes::tv_interval($t) if ($session->errorHandler->canShowPerformanceIndicators());
return $output;
}
return undef;
return;
} else {
my $i18n = WebGUI::International->new($session, 'Macro_AssetProxy');
return $i18n->get('invalid url');

2
lib/WebGUI/Macro/RandomAssetProxy.pm
View file

@ -50,7 +50,7 @@ sub process {
$randomAsset->prepareView;
return $randomAsset->view;
}
return undef;
return;
} else {
return $i18n->get('childless');
}

2
lib/WebGUI/Macro/Thumbnail.pm
View file

@ -37,7 +37,7 @@ sub process {
if (my $image = WebGUI::Asset::File::Image->newByUrl($session,$url)) {
return $image->getThumbnailUrl;
} else {
return undef;
return;
}
}