From: Ivan Kohler <ivan@freeside.biz>
Date: Tue, 7 Jul 2015 18:20:02 +0000 (-0700)
Subject: rename our internal VERSION sub to avoid conflict with Perl's needs (thanks to ETHER... 
X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-PPIPayMover.git;a=commitdiff_plain

rename our internal VERSION sub to avoid conflict with Perl's needs (thanks to ETHER for the report)
---

diff --git a/Changes b/Changes
index 8a50ce6..c1a5ff9 100644
--- a/Changes
+++ b/Changes
@@ -2,6 +2,8 @@ Revision history for Perl extension Business::OnlinePayment::PPIPayMover.
 
 0.02 unreleased
         - add Net::SSLeay to PREREQ_PM
+        - rename our internal VERSION sub to avoid conflict with Perl's needs
+          (thanks to ETHER for the report)
 
 0.01  Fri Jun 30 04:25:46 2006
 	- original version; created by h2xs 1.23 with options
diff --git a/lib/Business/OnlinePayment/PPIPayMover/TransactionClient.pm b/lib/Business/OnlinePayment/PPIPayMover/TransactionClient.pm
index cef6a99..930861e 100644
--- a/lib/Business/OnlinePayment/PPIPayMover/TransactionClient.pm
+++ b/lib/Business/OnlinePayment/PPIPayMover/TransactionClient.pm
@@ -37,7 +37,7 @@ sub doTransaction # take three arguements
   #$PostString .= "&";
   
   # write out version_id ...
-  my $temp = VERSION;
+  my $temp = PPI_VERSION;
   $temp =~ tr/ /+/;
   $PostString .= "version_id=$temp";
   $PostString .= "&";
diff --git a/lib/Business/OnlinePayment/PPIPayMover/constants.pm b/lib/Business/OnlinePayment/PPIPayMover/constants.pm
index 0015c74..c3cf68f 100644
--- a/lib/Business/OnlinePayment/PPIPayMover/constants.pm
+++ b/lib/Business/OnlinePayment/PPIPayMover/constants.pm
@@ -6,7 +6,7 @@ use Exporter;
 
 @ISA = qw(Exporter);
 
-@EXPORT = qw(VERSION
+@EXPORT = qw(PPI_VERSION
   PAY_HOST
   PAY_HOST_PATH
   PAY_HOST_PORT
@@ -107,7 +107,7 @@ use Exporter;
   NO_CHECK
 );
 
-sub VERSION { "Perl Plug v1.8.0" }
+sub PPI_VERSION { "Perl Plug v1.8.0" }
 
 #**
 # * Payment Host Information