caught an exception

This commit is contained in:
JT Smith 2003-09-29 21:36:36 +00:00
parent 346ebe6367
commit cc5248c8d6

View file

@ -24,10 +24,12 @@ use WebGUI::User;
sub grabReferral {
if ($session{user}{userId} != 1 && $session{user}{referringAffiliate} > 0) {
return "";
} elsif ($session{user}{userId} != 1 && $session{user}{referringAffiliate} == 0 && $session{scratch}{referringAffiliate} > 0) {
} elsif ($session{user}{userId} != 1 && (($session{user}{referringAffiliate} == 0 && $session{scratch}{referringAffiliate} > 0) || $session{form}{affiliateId} ne "")) {
my $u = WebGUI::User->new($session{user}{userId});
$u->referringAffiliate($session{scratch}{referringAffiliate});
WebGUI::Session::deleteScratch("referringAffiliate");
} elsif ($session{user}{userId} != 1) {
my $u = WebGUI::User->new($session{user}{userId});
$u->referringAffiliate(1);
} elsif ($session{form}{affiliateId} ne "") {
WebGUI::Session::setScratch("referringAffiliate",$session{form}{affiliateId});
}