[interchange] Ensure that &set always succeeds within a profile check.
Stefan Hornburg <[email protected]>
| Newsgroups | gmane.comp.web.interchange.cvs |
|---|---|
| Message-ID | <[email protected]> |
commit 753e02291563f06e0185c29fd0f857b741f56e40 Author: Stefan Hornburg (Racke) <[email protected]> Date: Tue Mar 29 09:47:29 2011 +0200 Ensure that &set always succeeds within a profile check. See documentation at http://www.icdevgroup.org/doc/frames/ic_ecommerce_21.html for reference. lib/Vend/Order.pm | 1 + 1 files changed, 1 insertions(+), 0 deletions(-) --- diff --git a/lib/Vend/Order.pm b/lib/Vend/Order.pm index c53793b..b0a47bf 100644 --- a/lib/Vend/Order.pm +++ b/lib/Vend/Order.pm @@ -126,6 +126,7 @@ my %Parse = ( my($ref,$params) = @_; my ($var, $value) = split /\s+/, $params, 2; $::Values->{$var} = $value; + return 1; }, '&setcheck' => sub { my($ref,$params) = @_;