From b4112e8d3d54e5c836444964e63b75f44fb23dab Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Tue, 3 Nov 2009 20:57:53 -0800
Subject: [PATCH] Update tests for UPS driver.  Cleanup diags.

---
 t/Shop/Ship.t           | 3 ++-
 t/Shop/ShipDriver/UPS.t | 8 ++++----
 2 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/t/Shop/Ship.t b/t/Shop/Ship.t
index 3db92dce6..a75073f33 100644
--- a/t/Shop/Ship.t
+++ b/t/Shop/Ship.t
@@ -93,8 +93,9 @@ cmp_bag(
     [
         'WebGUI::Shop::ShipDriver::FlatRate',
         'WebGUI::Shop::ShipDriver::USPS',
+        'WebGUI::Shop::ShipDriver::UPS',
     ],
-    'getDrivers: WebGUI only ships with 1 default shipping driver',
+    'getDrivers: WebGUI ships with 3 default shipping drivers',
 );
 
 #######################################################################
diff --git a/t/Shop/ShipDriver/UPS.t b/t/Shop/ShipDriver/UPS.t
index 40c2a4d9b..5aeab8a00 100644
--- a/t/Shop/ShipDriver/UPS.t
+++ b/t/Shop/ShipDriver/UPS.t
@@ -434,7 +434,7 @@ SKIP: {
     my $xmlData = XMLin($response->content, ForceArray => [qw/RatedPackage/],);
     ok($xmlData->{Response}->{ResponseStatusCode}, '... responseCode is successful');
     ok($xmlData->{RatedShipment}->{TotalCharges}->{MonetaryValue}, '... total charges returned');
-    diag($xmlData->{RatedShipment}->{TotalCharges}->{MonetaryValue});
+    #diag($xmlData->{RatedShipment}->{TotalCharges}->{MonetaryValue});
 
 }
 
@@ -451,7 +451,7 @@ SKIP: {
     my $xmlData = XMLin($response->content, ForceArray => [qw/RatedPackage/],);
     ok($xmlData->{Response}->{ResponseStatusCode}, '... responseCode is successful');
     ok($xmlData->{RatedShipment}->{TotalCharges}->{MonetaryValue}, '... total charges returned');
-    diag($xmlData->{RatedShipment}->{TotalCharges}->{MonetaryValue});
+    #diag($xmlData->{RatedShipment}->{TotalCharges}->{MonetaryValue});
 
 }
 
@@ -475,7 +475,7 @@ $xmlRate = XMLin( $xmlR,
     ForceArray => ['Package'],
 );
 
-diag Dumper $xmlRate;
+#diag Dumper $xmlRate;
 
 cmp_deeply(
     $xmlRate, {
@@ -517,7 +517,7 @@ SKIP: {
     my $xmlData = XMLin($response->content, ForceArray => [qw/RatedPackage/],);
     ok($xmlData->{Response}->{ResponseStatusCode}, '... responseCode is successful');
     ok($xmlData->{RatedShipment}->{TotalCharges}->{MonetaryValue}, '... total charges returned');
-    diag $xmlData->{RatedShipment}->{TotalCharges}->{MonetaryValue};
+    #diag $xmlData->{RatedShipment}->{TotalCharges}->{MonetaryValue};
 
 }