From a3f66409e2aba8df7b852bcb3358dde2b2589d1b Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 22 Mar 2007 02:29:30 +0000 Subject: ripped out a bunch of hastily-conceived ->param BS more appropriate for implementation in a base class. Server names were incorrect. Tests were broken. Very dissapointing. --- t/bop.t | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 't/bop.t') diff --git a/t/bop.t b/t/bop.t index 5f03ca2..c41188d 100644 --- a/t/bop.t +++ b/t/bop.t @@ -17,14 +17,14 @@ my $driver = "PayflowPro"; # convenience methods can_ok( $obj, qw(vendor partner) ); - can_ok( $obj, qw(order_number avs_code cvv2_code) ); - can_ok( $obj, qw(request_id param debug expdate_mmyy) ); + can_ok( $obj, qw(order_number avs_code cvv2_response) ); + can_ok( $obj, qw(request_id debug expdate_mmyy) ); # internal methods can_ok( $obj, qw(_map_fields _revmap_fields) ); # defaults - my $server = "payflow.verisign.com"; + my $server = "payflowpro.verisign.com"; is( $obj->server, $server, "server($server)" ); is( $obj->port, "443", "port(443)" ); -- cgit v1.2.1