add new error message to FileUrl macro

This commit is contained in:
Colin Kuskie 2006-07-23 01:35:20 +00:00
parent 10135118d2
commit c1246444e0
3 changed files with 13 additions and 1 deletions

View file

@ -50,9 +50,14 @@ sub process {
}
my $storageId = $asset->get('storageId');
if (not defined $storageId) {
$session->errorHandler->warn("^FileUrl($url): asset is not a file");
$session->errorHandler->warn("^FileUrl($url): asset does not store files");
return $i18n->get('no storage');
}
my $filename = $asset->get('filename');
if (not defined $filename) {
$session->errorHandler->warn("^FileUrl($url): asset does not have a 'filename' property");
return $i18n->get('no filename');
}
my $storage = WebGUI::Storage->get($session,$storageId);
return $storage->getUrl($asset->get("filename"));
}