summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
8073b48)
- Require description (programdesc).
Revision history for Business-OnlinePayment-Jety
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.
0.03 Fri Nov 6 13:32:06 PST 2009
- Don't default programdesc to our real phone number.
use Tie::IxHash;
@ISA = qw(Business::OnlinePayment::HTTPS);
use Tie::IxHash;
@ISA = qw(Business::OnlinePayment::HTTPS);
$me = 'Business::OnlinePayment::Jety';
$DEBUG = 0;
$me = 'Business::OnlinePayment::Jety';
$DEBUG = 0;
account_number
routing_code
amount
account_number
routing_code
amount
- 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()) {
$DB::single = $DEBUG;
if($self->test_transaction()) {
login => 'testdrive',
password => 'testpass',
action => 'Normal Authorization',
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',
amount => '49.95',
invoice_number => '100100',
first_name => 'Jason',
-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"