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

Don't blow up on view when there are no WebGUI::Asset::WikiPage

Browse source 
child objects under us to feature.  Also, the only reason that -1
on the rand works is because Perl is nice.
This commit is contained in:
Scott Walters 2010-08-09 15:17:00 -04:00
parent e43745cd86
commit 9eea40aeff
1 changed files with 6 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/WebGUI/Asset/Wobject/WikiMaster.pm
View file

@ -838,10 +838,13 @@ sub view {
my $featuredIds = $self->getFeaturedPageIds; my $featuredIds = $self->getFeaturedPageIds;
if( @$featuredIds ) { if( @$featuredIds ) {
# it's possible for a WikiMaster not to have any WikiPage featured; it's also possible for any to not render
my $featuredId = $featuredIds->[ int( rand @$featuredIds ) - 1 ]; my $featuredId = $featuredIds->[ int( rand @$featuredIds ) - 1 ];
my $featured = eval { WebGUI::Asset->newById( $session, $featuredId ) }; if( $featuredId ) {
if ( ! Exception::Class->caught() ) { my $featured = eval { WebGUI::Asset->newById( $session, $featuredId ) };
$self->appendFeaturedPageVars( $var, $featured ); if ( ! Exception::Class->caught() ) {
$self->appendFeaturedPageVars( $var, $featured );
}
} }
} }