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

Added the viewcart macro.

Browse source 
Lookup registrant now works.
Fixed some bugs.
This commit is contained in:
JT Smith 2008-04-11 22:00:17 +00:00
parent 02c24aa44a
commit 23ea56bbe6
10 changed files with 164 additions and 36 deletions
Download patch file Download diff file Expand all files Collapse all files

47
lib/WebGUI/Macro/ViewCart.pm Normal file
View file

@ -0,0 +1,47 @@
package WebGUI::Macro::ViewCart;
#-------------------------------------------------------------------
# WebGUI is Copyright 2001-2008 Plain Black Corporation.
#-------------------------------------------------------------------
# Please read the legal notices (docs/legal.txt) and the license
# (docs/license.txt) that came with this distribution before using
# this software.
#-------------------------------------------------------------------
# http://www.plainblack.com info@plainblack.com
#-------------------------------------------------------------------
use strict;
use WebGUI::International;
=head1 NAME
Package WebGUI::Macro::ViewCart
=head1 DESCRIPTION
Displays a view cart link and image.
=head2 process( $session, [ linktext ] )
Renders the macro.
=head3 linktext
Defaults to "View Cart".
=cut
#-------------------------------------------------------------------
sub process {
my ($session, $text) = @_;
unless ($text) {
$text = WebGUI::International->new($session,"Shop")->get("view cart");
}
my $url = $session->url->page("shop=cart");
return '<a href="'.$url.'"><img src="'.$session->url->extras('/macro/ViewCart/cart.gif').'" alt="'.$text.'" style="border: 0px;vertical-align: middle;" /></a> <a href="'.$url.'">'.$text.'</a>';
}
1;