Reinstate cardholder, for t/40live.t

diff --git a/InternetSecure.pm b/InternetSecure.pm
index 0029e91..1dc16f4 100755 (executable)
--- a/InternetSecure.pm
+++ b/InternetSecure.pm
@@ -39,7 +39,7 @@ sub set_defaults {
        $self->build_subs(qw(
                                receipt_number  sales_number
                                date
-                               card_type
+                               card_type       cardholder
                                total_amount
                                avs_response    cvv2_response
                        ));
@@ -256,6 +256,7 @@ sub parse_response {
                        ReceiptNumber           receipt_number
                        SalesOrderNumber        sales_number
                        Date                    date
+                       xxxName                 cardholder
                        CardType                card_type
                        Page                    result_code
                        ApprovalCode            authorization
@@ -484,6 +485,11 @@ Date and time of the transaction.  Format is C<YYYY/MM/DD hh:mm:ss>.
 
 Total amount billed for this order, including taxes.
 
+=item cardholder()
+
+Cardholder's name.  This is currently a mere copy of the B<name> field passed
+to B<submit()>.
+
 =item card_type()
 
 Type of the credit card used for the submitted order, being one of the