oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

use note instead of diag in tests for non-error debug output

Browse source
This commit is contained in:
Graham Knop 2009-09-23 08:29:05 -05:00
parent 929c012075
commit 67b729fee0
30 changed files with 50 additions and 50 deletions
Download patch file Download diff file Expand all files Collapse all files

8
t/Shop/PayDriver/ITransact.t
View file

@ -40,7 +40,7 @@ plan tests => 1 + $tests;
#----------------------------------------------------------------------------
# figure out if the test can actually run
diag('Testing existence');
note('Testing existence');
my $loaded = use_ok('WebGUI::Shop::PayDriver::ITransact');
my $e;
@ -96,7 +96,7 @@ skip 'Unable to load module WebGUI::Shop::PayDriver::ITransact', $tests unless $
#
#######################################################################
diag('Testing definition');
note('Testing definition');
my $definition;
eval { $definition = WebGUI::Shop::PayDriver::ITransact->definition(); };
@ -294,7 +294,7 @@ TODO: {
SKIP: {
skip "Skipping XML requests to ITransact due to lack of userId and password", 2 unless $hasTestAccount;
my $response = eval { $driver->doXmlRequest($xml) };
diag 'doXmlrequest';
note 'doXmlrequest';
isa_ok($response, 'HTTP::Response', 'returns a HTTP::Response object');
ok( $response->is_success, '... was successful');
}
@ -313,7 +313,7 @@ SKIP: {
my $response = eval { $driver->doXmlRequest($xml) };
isa_ok($response, 'HTTP::Response', 'returns a HTTP::Response object');
ok( $response->is_success, '... was successful');
diag $response->content;
note $response->content;
}
#######################################################################

4
t/Shop/PayDriver/Ogone.t
View file

@ -39,7 +39,7 @@ plan tests => 1 + $tests;
my $e;
diag('Testing existence');
note('Testing existence');
my $loaded = use_ok('WebGUI::Shop::PayDriver::Ogone');
SKIP: {
@ -52,7 +52,7 @@ skip 'Unable to load module WebGUI::Shop::PayDriver::Ogone', $tests unless $load
#
#######################################################################
diag('Testing definition');
note('Testing definition');
my $definition;
eval { $definition = WebGUI::Shop::PayDriver::Ogone->definition(); };

3
t/Shop/ShipDriver.t
View file

@ -357,8 +357,7 @@ cmp_deeply(
isa_ok( $driver->get(), 'HASH', 'get returns a hashref if called with no param');
use Data::Dumper;
diag Dumper $driver->get();
note explain $driver->get();
is($driver->get('groupToUse'), 7, '... default group is 7');

2
t/Shop/loadProductAssets.pl
View file

@ -81,4 +81,4 @@ my $template1 = $root->addChild($tProperties1);
$tag->commit;
diag "Done.";
note "Done.";

6
t/Shop/loadProducts.pl
View file

@ -54,7 +54,7 @@ my $properties1 = {
my $root = WebGUI::Asset->getRoot($session);
my $product1 = $root->addChild($properties1);
diag ref $product1;
note ref $product1;
my $properties2 = {
className => 'WebGUI::Asset::Wobject::Product',
@ -67,7 +67,7 @@ my $properties2 = {
my $product2 = $root->addChild($properties2);
diag ref $product2;
note ref $product2;
$tag->commit;
sleep 2;
@ -185,4 +185,4 @@ $productb->setCollateral('Product_benefit', 'Product_benefitId', {
$tag->commit;
diag "Done.";
note "Done.";