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

add style picker during setup

Browse source
This commit is contained in:
Doug Bell 2010-04-26 19:07:53 -05:00
parent 23d80cfa5c
commit 097fb4c4a3
7 changed files with 688 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lib/WebGUI/Asset/Template.pm
View file

@ -407,6 +407,22 @@ sub getEditForm {
return $tabform;
}
#-------------------------------------------------------------------
=head2 getExampleImageUrl ( )
Get the URL to the example image of this template, if any
=cut
sub getExampleImageUrl {
my ( $self ) = @_;
if ( my $storageId = $self->get('storageIdExample') ) {
my $storage = WebGUI::Storage->get( $self->session, $storageId );
return $storage->getUrl( $storage->getFiles->[0] );
}
return;
}
#-------------------------------------------------------------------