[interchange-cvs] interchange - heins modified lib/Vend/Payment/TCLink.pm

interchange-cvs at icdevgroup.org interchange-cvs at icdevgroup.org
Wed Jun 9 13:13:47 EDT 2004


User:      heins
Date:      2004-06-09 17:13:46 GMT
Modified:  lib/Vend/Payment TCLink.pm
Log:
* Fix bug found by Vitaly <vit at e-securion.com>

Revision  Changes    Path
1.6       +2 -2      interchange/lib/Vend/Payment/TCLink.pm


rev 1.6, prev_rev 1.5
Index: TCLink.pm
===================================================================
RCS file: /var/cvs/interchange/lib/Vend/Payment/TCLink.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- TCLink.pm	7 Jun 2004 20:59:18 -0000	1.5
+++ TCLink.pm	9 Jun 2004 17:13:46 -0000	1.6
@@ -1,6 +1,6 @@
 # Vend::Payment::TCLink - Interchange TrustCommerce TCLink support
 #
-# $Id: TCLink.pm,v 1.5 2004/06/07 20:59:18 mheins Exp $
+# $Id: TCLink.pm,v 1.6 2004/06/09 17:13:46 mheins Exp $
 #
 # Copyright (C) 2002 TrustCommerce <developer at trustcommerce.com>
 #
@@ -356,7 +356,7 @@
 			if defined $result{$result_map{$_}};
 	}
 
-	if ($result{status} == 'approved') {
+	if ($result{status} eq 'approved') {
 		$result{MStatus} = 'success';
 	}
 	else {








More information about the interchange-cvs mailing list