[interchange-cvs] interchange - kwalsh modified
code/UserTag/save_cart.tag
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Sun Dec 16 05:15:09 EST 2007
User: kwalsh
Date: 2007-12-16 10:15:09 GMT
Modified: code/UserTag save_cart.tag
Log:
* Don't delete the cart after saving if the new "keep" parameter
is set true.
Revision Changes Path
1.7 +5 -5 interchange/code/UserTag/save_cart.tag
rev 1.7, prev_rev 1.6
Index: save_cart.tag
===================================================================
RCS file: /var/cvs/interchange/code/UserTag/save_cart.tag,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- save_cart.tag 30 Mar 2007 23:40:57 -0000 1.6
+++ save_cart.tag 16 Dec 2007 10:15:09 -0000 1.7
@@ -5,14 +5,14 @@
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version. See the LICENSE file for details.
#
-# $Id: save_cart.tag,v 1.6 2007/03/30 23:40:57 pajamian Exp $
+# $Id: save_cart.tag,v 1.7 2007/12/16 10:15:09 kwalsh Exp $
-UserTag save_cart Order nickname recurring
+UserTag save_cart Order nickname recurring keep
UserTag save_cart AttrAlias name nickname
-UserTag save_cart Version $Revision: 1.6 $
+UserTag save_cart Version $Revision: 1.7 $
UserTag save_cart Routine <<EOR
sub {
- my($nickname,$recurring) = @_;
+ my($nickname,$recurring,$keep) = @_;
my $add = 0;
my %names = ();
@@ -43,7 +43,7 @@
return '';
}
- $Carts->{main} = [];
+ $Carts->{main} = [] unless is_yes($keep);
return '';
}
More information about the interchange-cvs
mailing list