summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2009-11-06 23:53:41 +0000
committerivan <ivan>2009-11-06 23:53:41 +0000
commit6025211e7077e9ce8b15ffbe0d3f09887d813613 (patch)
tree0c4c75b48d44ec4e9a45e9f2212c4240d720874c
parent8073b48748fd5be813f4ac61fa4cf4d57570a6ac (diff)
- Really use 111-1111-1111 if no phone number is provided.
- Require description (programdesc).
-rw-r--r--Changes4
-rw-r--r--lib/Business/OnlinePayment/Jety.pm16
2 files changed, 12 insertions, 8 deletions
diff --git a/Changes b/Changes
index 4f163cf..799e01a 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,9 @@
Revision history for Business-OnlinePayment-Jety
+0.04 Fri Nov 6 15:34:48 PST 2009
+ - Really use 111-1111-1111 if no phone number is provided.
+ - Require description (programdesc).
+
0.03 Fri Nov 6 13:32:06 PST 2009
- Don't default programdesc to our real phone number.
diff --git a/lib/Business/OnlinePayment/Jety.pm b/lib/Business/OnlinePayment/Jety.pm
index a272e8e..be73019 100644
--- a/lib/Business/OnlinePayment/Jety.pm
+++ b/lib/Business/OnlinePayment/Jety.pm
@@ -10,7 +10,7 @@ use Date::Format;
use Tie::IxHash;
@ISA = qw(Business::OnlinePayment::HTTPS);
-$VERSION = '0.03';
+$VERSION = '0.04';
$me = 'Business::OnlinePayment::Jety';
$DEBUG = 0;
@@ -104,15 +104,13 @@ sub submit {
state
zip
email
- phone
account_number
routing_code
amount
- ) );
+ description
+ ));
$self->map_fields;
- tie my %request, 'Tie::IxHash', (
- map { $_, $self->{_content}->{$_} } @fields
- );
+ tie my %request, 'Tie::IxHash', map { $_ => $self->{_content}->{$_} } @fields;
$DB::single = $DEBUG;
if($self->test_transaction()) {
@@ -170,7 +168,7 @@ Business::OnlinePayment::Jety - Jety Payments ACH backend for Business::OnlinePa
login => 'testdrive',
password => 'testpass',
action => 'Normal Authorization',
- description => 'Business::OnlinePayment test',
+ description => '111-111-1111 www.example.com',
amount => '49.95',
invoice_number => '100100',
first_name => 'Jason',
@@ -196,7 +194,9 @@ Business::OnlinePayment::Jety - Jety Payments ACH backend for Business::OnlinePa
=head2 ECHECK
-Content required: type, login, password, action, amount, first_name, last_name, account_number, routing_code.
+Content required: type, login, password, action, amount, first_name, last_name, account_number, routing_code, description.
+
+description should be set in the form "111-111-1111 www.example.com"
=head1 DESCRIPTION