Massage infuse() order a bit

1 files changed, 7 insertions, 5 deletions

diff --git a/InternetSecure.pm b/InternetSecure.pm
index 2b63019..2ad18fd 100755
--- a/InternetSecure.pm
+++ b/InternetSecure.pm
@@ -241,17 +241,19 @@ sub parse_response {
 	$self->is_success($code eq '2000' || $code eq '90000' || $code eq '900P1');
 
 	$self->infuse($response,
+			result_code	=> 'Page',
+			error_message	=> 'Verbiage',
+			authorization	=> 'ApprovalCode',
+			avs_response	=> 'AVSResponseCode',
+			cvv2_response	=> 'CVV2ResponseCode',
+
 			receipt_number	=> 'ReceiptNumber',
 			sales_number	=> 'SalesOrderNumber',
+
 			date		=> 'Date',
 			cardholder	=> 'xxxName',
 			card_type	=> 'CardType',
-			result_code	=> 'Page',
-			authorization	=> 'ApprovalCode',
-			error_message	=> 'Verbiage',
 			total_amount	=> 'TotalAmount',
-			avs_response	=> 'AVSResponseCode',
-			cvv2_response	=> 'CVV2ResponseCode',
 			);
 	
 	# Completely undocumented field that sometimes override <Verbiage>