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

Optional second parameter can be a boolean value to turn off file icons.

Browse source
This commit is contained in:
Alan Ritari 2004-02-10 19:03:40 +00:00
parent 7c853a309f
commit 1408a69813
1 changed files with 13 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

17
lib/WebGUI/Macro/File.pm
View file

@ -19,10 +19,19 @@ use WebGUI::Session;
sub process { sub process {
my @param = WebGUI::Macro::getParams($_[0]); my @param = WebGUI::Macro::getParams($_[0]);
if (my $collateral = WebGUI::Collateral->find($param[0])) { if (my $collateral = WebGUI::Collateral->find($param[0])) {
return '<a href="' . $collateral->getURL .
'"><img src="' . $collateral->getIcon . # include default icon unless a second param
'" align="middle" border="0" /> ' . if ( ! $param[1] ) {
$collateral->get("name") . '</a>'; return '<a href="' . $collateral->getURL .
'"><img src="' . $collateral->getIcon .
'" align="middle" border="0" /> ' .
$collateral->get("name") . '</a>';
# second param was flag, so no accompanying image
} else {
return '<a href="' . $collateral->getURL .
'">' . $collateral->get("name") . '</a>';
}
} else { } else {
return undef; return undef;
} }