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

mod_perl warnings fixes

Browse source
This commit is contained in:
JT Smith 2003-05-26 04:41:24 +00:00
parent 938ccbb565
commit 53f0b7c0f3
5 changed files with 34 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Operation/Collateral.pm
View file

@ -486,12 +486,12 @@ sub _htmlAreaCreateTree {
#-------------------------------------------------------------------
sub www_htmlArealistCollateral {
my (@parents, $output, $sth, $data, $folderId, $parent, $indent);
my (@parents, $sth, $data, $indent);
$session{form}{makePrintable}=1; $session{form}{style}=-10; # Special style for this output
return "<b>Only Content Managers are allowed to use WebGUI Collateral</b>" unless (WebGUI::Privilege::isInGroup(4));
$output .= '<table border="0" cellspacing="0" cellpadding="0" width="100%">';
$folderId = $session{form}{fid} || 0;
my $output = '<table border="0" cellspacing="0" cellpadding="0" width="100%">';
my $folderId = $session{form}{fid} || 0;
my $parent = $folderId;
# push parent folders in array so it can be reversed
unshift(@parents, $parent);