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

added a rudamentary affiliate tracking program

Browse source
This commit is contained in:
JT Smith 2003-08-29 22:13:19 +00:00
parent 781526066f
commit ac102923ce
5 changed files with 37 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI.pm
View file

@ -13,6 +13,7 @@ our $VERSION = "5.5.0";
use strict qw(vars subs);
use Tie::CPHash;
use WebGUI::Affiliate;
use WebGUI::Cache;
use WebGUI::ErrorHandler;
use WebGUI::Icon;
@ -77,8 +78,7 @@ sub _generatePage {
}
if(!WebGUI::Privilege::canViewWobject($wobject->{wobjectId})){ next; }
if (${$wobject}{namespace} eq "WobjectProxy") {
if (${$wobject}{namespace} eq "WobjectProxy") {
$originalWobject = $wobject;
my ($wobjectProxy) = WebGUI::SQL->quickHashRef("select * from WobjectProxy where wobjectId=".${$wobject}{wobjectId});
$wobject = WebGUI::SQL->quickHashRef("select * from wobject where wobject.wobjectId=".$wobjectProxy->{proxiedWobjectId});
@ -225,6 +225,7 @@ sub page {
$content = $cache->get;
}
$operationOutput = _processOperations();
WebGUI::Affiliate::grabReferral();
$wobjectOutput = _processFunctions();
if ($operationOutput eq "" && $wobjectOutput eq "" && $session{form}{action2} ne "") {
_processAction($session{form}{action2});