diff options
| -rw-r--r-- | Changes | 2 | ||||
| -rw-r--r-- | lib/Business/OnlinePayment/PPIPayMover/TransactionClient.pm | 2 | ||||
| -rw-r--r-- | lib/Business/OnlinePayment/PPIPayMover/constants.pm | 4 |
3 files changed, 5 insertions, 3 deletions
@@ -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
|