forward port of bug fixes and POD upgrade
This commit is contained in:
parent
87287d9b58
commit
662c43ca21
4 changed files with 9 additions and 6 deletions
|
|
@ -173,7 +173,7 @@ sub editSave {
|
|||
$data{filename} = $data{title} = $data{menuTitle} = $filename;
|
||||
$data{templateId} = 'PBtmpl0000000000000024';
|
||||
$data{templateId} = 'PBtmpl0000000000000088' if ($selfName eq "WebGUI::Asset::File::Image");
|
||||
$data{url} = $self->getParent->getUrl.'/'.$filename;
|
||||
$data{url} = $self->getParent->get('url').'/'.$filename;
|
||||
my $newAsset = $self->getParent->addChild(\%data);
|
||||
delete $newAsset->{_storageLocation};
|
||||
$newAsset->setSize($storage->getFileSize($filename));
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue