[interchange-cvs] [SCM] Interchange branch, master, updated. REL_5_7_2-6-g8cd47ac

Peter Ajamian interchange-cvs at icdevgroup.org
Wed Sep 30 03:46:34 UTC 2009


This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Interchange".

The branch, master has been updated
       via  8cd47ac938422208c2ec20ff076902e5c53f7834 (commit)
      from  5377377546fc2934106cdf540ff0c3c91f2b7feb (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 8cd47ac938422208c2ec20ff076902e5c53f7834
Author: Richard Templet <richard at endpoint.com>
Date:   Tue Sep 29 19:38:31 2009 -0500

    Allow variable to override default LUHN-10 error message
    
    Modification to the Order.pm file to allow a catalog
    level variable, LUHN_10_ERRMSG, to override the default
    error message when a credit card doesn't pass the LUHN-10
    check.

-----------------------------------------------------------------------

Summary of changes and diff:
 WHATSNEW-5.7                        |   12 ++++++++++++
 dist/standard/products/variable.txt |    1 +
 lib/Vend/Order.pm                   |    2 +-
 3 files changed, 14 insertions(+), 1 deletions(-)

diff --git a/WHATSNEW-5.7 b/WHATSNEW-5.7
index 37286fd..6d4eed3 100644
--- a/WHATSNEW-5.7
+++ b/WHATSNEW-5.7
@@ -8,6 +8,18 @@
 See UPGRADE document for a list of incompatible changes.
 
 
+Interchange 5.7.3 released ####-##-##.
+
+
+Core
+----
+
+* Allow variable to override default LUHN-10 error message.
+
+
+------------------------------------------------------------------------------
+
+
 Interchange 5.7.2 released 2009-09-17.
 
 
diff --git a/dist/standard/products/variable.txt b/dist/standard/products/variable.txt
index 7191aeb..43eb0f4 100644
--- a/dist/standard/products/variable.txt
+++ b/dist/standard/products/variable.txt
@@ -37,6 +37,7 @@ LINKHOST	__MVC_LINKHOST__	Admin Control
 LINKPORT	__MVC_LINKPORT__	Admin Control
 LOCALES	__MVC_LOCALES__	Internationalization
 LOGO	logo.png	Template
+LUHN_10_ERRMSG  Credit card number fails LUHN-10 check. Order  
 MAILING_FROM	__MVC_COMPANY__ <__MVC_MAILORDERTO__>	Mailings
 MAILING_MAX_DIRECT	50	Mailings
 MAILING_TO	{FNAME} {LNAME} <{EMAIL}>	Mailings
diff --git a/lib/Vend/Order.pm b/lib/Vend/Order.pm
index 1ebf218..4b371e3 100644
--- a/lib/Vend/Order.pm
+++ b/lib/Vend/Order.pm
@@ -622,7 +622,7 @@ sub encrypt_standard_cc {
 	}
 
 	unless ($valid = luhn($num) || $force ) {
-		my $msg = errmsg("Credit card number fails LUHN-10 check.");
+		my $msg = errmsg($::Variable->{LUHN_10_ERRMSG} || "Credit card number fails LUHN-10 check.");
 		$Vend::Session->{errors}{mv_credit_card_valid} = $msg;
 		push @return, $msg;
 		return @return;


hooks/post-receive
-- 
Interchange



More information about the interchange-cvs mailing list