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

added getCartBySession()

Browse source
This commit is contained in:
JT Smith 2008-03-13 21:15:56 +00:00
parent d47d2f2a9c
commit 7c184b26c3
4 changed files with 22 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI/Content/Shop.pm
View file

@ -109,7 +109,7 @@ sub www_cart {
my $session = shift;
my $output = undef;
my $method = "www_". ( $session->form->get("method") || "view");
my $cart = WebGUI::Shop::Cart->create($session);
my $cart = WebGUI::Shop::Cart->getCartBySession($session);
if ($cart->can($method)) {
$output = $cart->$method();
}

22
lib/WebGUI/Shop/Cart.pm
View file

@ -92,9 +92,7 @@ sub create {
unless (defined $session && $session->isa("WebGUI::Session")) {
WebGUI::Error::InvalidObject->throw(expected=>"WebGUI::Session", got=>(ref $session), error=>"Need a session.");
}
my $cartId = $session->db->quickScalar("select cartId from cart where sessionId=?",[$session->getId]);
return $class->new($session, $cartId) if (defined $cartId);
$cartId = $session->id->generate;
my $cartId = $session->id->generate;
$session->db->write('insert into cart (cartId, sessionId) values (?,?)', [$cartId, $session->getId]);
return $class->new($session, $cartId);
}
@ -183,6 +181,24 @@ sub getAddressBook {
#-------------------------------------------------------------------
=head2 getCartBySession ()
Class method that figures out if the user has a cart in their session. If they do it returns it. If they don't it creates it and returns it.
=cut
sub getCartBySession {
my ($class, $session) = @_;
unless (defined $session && $session->isa("WebGUI::Session")) {
WebGUI::Error::InvalidObject->throw(expected=>"WebGUI::Session", got=>(ref $session), error=>"Need a session.");
}
my $cartId = $session->db->quickScalar("select cartId from cart where sessionId=?",[$session->getId]);
return $class->new($session, $cartId) if (defined $cartId);
return $class->create($session);
}
#-------------------------------------------------------------------
=head2 getId ()
Returns the unique id for this cart.

2
t/Shop/Cart.t
View file

@ -35,7 +35,7 @@ plan tests => 16; # Increment this number for each test you create
#----------------------------------------------------------------------------
# put your tests here
my $cart = WebGUI::Shop::Cart->create($session);
my $cart = WebGUI::Shop::Cart->getCartBySession($session);
isa_ok($cart, "WebGUI::Shop::Cart");
isa_ok($cart->session, "WebGUI::Session");

2
t/Shop/Tax.t
View file

@ -540,7 +540,7 @@ is($e->error, 'Must pass in a WebGUI::Shop::Cart object', 'calculate: error hand
##Build a cart, add some Donation SKUs to it. Set one to be taxable.
my $cart = WebGUI::Shop::Cart->create($session);
my $cart = WebGUI::Shop::Cart->getCartBySession($session);
is($taxer->calculate($cart), 0, 'calculate returns 0 if there is no shippingAddressId in the cart');