added a bunch of style functions

This commit is contained in:
JT Smith 2004-01-04 06:02:28 +00:00
parent 264287a0fb
commit 759dfd2f6b
22 changed files with 75 additions and 36 deletions

View file

@ -66,6 +66,7 @@ our @EXPORT = qw(&menuWrapper);
#-------------------------------------------------------------------
sub menuWrapper {
my ($output, $key);
$session{page}{useAdminStyle} = 1;
$output = '<table width="100%" border="0" cellpadding="5" cellspacing="0">
<tr><td width="70%" class="tableData" valign="top">';
$output .= $_[0];