adding POD

This commit is contained in:
JT Smith 2003-10-19 04:20:43 +00:00
parent c1d74cbfa2
commit 61a859d862
2 changed files with 303 additions and 2 deletions

View file

@ -14,13 +14,38 @@ package WebGUI::Affiliate;
=cut
use WebGUI::Session;
use WebGUI::SQL;
use WebGUI::User;
=head1 DESCRIPTION
Tracks where users come from.
NOTE: This package is experimental as is not officially supported yet.
=head1 SYNOPSIS
use WebGUI::Affiliate;
WebGUI::Affiliate::grabReferral();
=head1 FUNCTIONS
These functions are available from this package:
=cut
#-------------------------------------------------------------------
=head2 grabReferral ( )
Grabs referral information out of the session and adds it to the user's
account if possible.
=cut
sub grabReferral {
if ($session{user}{userId} != 1 && $session{user}{referringAffiliate} > 0) {
return "";