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

fixed a few bugs

Browse source
This commit is contained in:
JT Smith 2004-08-31 15:58:33 +00:00
parent 6067d3204e
commit 5fabdf758a
5 changed files with 11 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/WebGUI.pm
View file

@ -120,6 +120,7 @@ sub page {
my $output = _processOperations();
if ($output ne "") {
$output = _generatePage($output);
$output = WebGUI::HTTP::getHeader().$output;
} else {
my $useCache = (
$session{form}{op} eq "" &&
@ -153,18 +154,16 @@ sub page {
} else {
$ttl = $session{page}{cacheTimeout};
}
$output = WebGUI::HTTP::getHeader().$output;
$cache->set($output, $ttl) if ($useCache);
WebGUI::PassiveProfiling::addPage(); # add wobjects on page to passive profile log
}
}
WebGUI::Affiliate::grabReferral(); # process affilliate tracking request
my $httpHeader = WebGUI::HTTP::getHeader();
# This allows an operation or wobject to write directly to the browser.
if ($session{page}{empty}) {
$httpHeader = $output = undef;
}
$output = undef if ($session{page}{empty});
WebGUI::Session::close() unless ($useExistingSession);
return $httpHeader.$output;
return $output;
}

2
lib/WebGUI/Session.pm
View file

@ -128,7 +128,7 @@ sub _setupUserInfo {
#-------------------------------------------------------------------
sub _time {
return &UnixDate(&ParseDate("now")),"%s");
return &UnixDate(&ParseDate("now"),"%s");
}

4
lib/WebGUI/i18n/English/WebGUI.pm
View file

@ -3838,8 +3838,8 @@ The primary URL of your company. This will appear on all automated emails sent f
},
'11' => {
message => q|Empy trash.|,
lastUpdated => 1031514049
message => q|Empty trash.|,
lastUpdated => 1051514049
},
'492' => {