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

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

View file

@ -184,12 +184,12 @@ is(
#
####################################################
#diag $snippets[0]->get('lineage');
#diag $snippet2->get('lineage');
#note $snippets[0]->get('lineage');
#note $snippet2->get('lineage');
##Uncomment me to crash the test
#$snippet2->cascadeLineage($snippets[0]->get('lineage'));
#diag $snippets[0]->get('lineage');
#diag $snippet2->get('lineage');
#note $snippets[0]->get('lineage');
#note $snippet2->get('lineage');
####################################################
#

View file

@ -43,7 +43,7 @@ my $originalVersionTags = $session->db->quickScalar(q{select count(*) from asset
#
################################################################
diag "purgeRevision tests";
note "purgeRevision tests";
my $template = $root->addChild($propertyHash);
$template->commit;
@ -93,7 +93,7 @@ $templatev2 = $template->addRevision({template => 'Vie gates. Ich bin ein templ
my $tag2 = WebGUI::VersionTag->getWorking($session);
$tag2->commit;
WebGUI::Test->tagsToRollback($tag2);
diag "purge";
note "purge";
checkTableEntries($templatev2->getId, 1,2,2);
$versionTagCheck = $session->db->quickScalar(q{select count(*) from assetVersionTag});
is($versionTagCheck, $originalVersionTags+2, 'created two version tags');

View file

@ -69,7 +69,8 @@ ok(
eval{ $photo->makeResolutions; 1 },
"makeResolutions succeeds when photo under photo gallery and no resolution given",
);
diag( $@ );
diag( $@ )
if $@;
cmp_deeply(
$photo->getStorageLocation->getFiles,
@ -121,7 +122,8 @@ ok(
eval{ $photo->makeResolutions(['100x100','200x200']); 1 },
"makeResolutions succeeds when first argument is array reference of resolutions to make",
);
diag( $@ );
diag( $@ )
if $@;
is_deeply(
[ sort({ $a cmp $b} @{ $photo->getStorageLocation->getFiles }) ],
@ -194,7 +196,8 @@ $photo->update({ filename => 'page_title.jpg' });
eval{ $photo->makeResolutions(['abc','200','3d400']); 1 },
"makeResolutions succeeds when invalid resolutions are given",
);
diag( $@ );
diag( $@ )
if $@;
is(
scalar @warnings, 2,

View file

@ -344,7 +344,7 @@ cmp_deeply(
'...collateral was removed'
);
diag $asset->getId;
note $asset->getId;
$tag->rollback;

View file

@ -324,7 +324,7 @@ $story->setPhotoData([
my $viewVariables = $story->viewTemplateVariables;
#diag Dumper $viewVariables;
#note explain $viewVariables;
cmp_deeply(
$viewVariables->{highlights_loop},
[

View file

@ -219,9 +219,9 @@ is(scalar @{ $windowCal->getLineage(['children'])}, 9, 'added events to the wind
my @window = $windowCal->getEventsIn($startDt->toDatabase, $endDt->toDatabase);
#diag $startDt->toDatabase;
#diag join "\n", map { join ' ', $_->get('title'), $_->get('startDate'), $_->get('startTime')} @window;
#diag $endDt->toDatabase;
#note $startDt->toDatabase;
#note join "\n", map { join ' ', $_->get('title'), $_->get('startDate'), $_->get('startTime')} @window;
#note $endDt->toDatabase;
is(scalar @window, 4, 'getEventsIn returned 4 events');
cmp_bag(

View file

@ -94,7 +94,7 @@ $post = $collab->addChild($props,
my $rssitems = $collab->getRssFeedItems();
is(scalar @{ $rssitems }, 2, 'rssitems set to number of posts added');
diag "AssetAspect tests";
note "AssetAspect tests";
is($collab->getRssFeedUrl, '/collab?func=viewRss', 'getRssFeedUrl');
is($collab->getRdfFeedUrl, '/collab?func=viewRdf', 'getRdfFeedUrl');
is($collab->getAtomFeedUrl, '/collab?func=viewAtom', 'getAtomFeedUrl');

View file

@ -50,8 +50,8 @@ my $album
{
skipAutoCommitWorkflows => 1,
});
diag $album->get('title');
diag $album->get('description');
note $album->get('title');
note $album->get('description');
my @photos;
for my $i ( 0 .. 5 ) {
$photos[ $i ]

View file

@ -106,7 +106,7 @@ my $uploadsPath = Path::Class::Dir->new($session->config->get('uploadsPath'));
my $uploadsUrl = Path::Class::Dir->new($session->config->get('uploadsURL'));
my $graphRelative = $graphUrl->relative($uploadsUrl);
my $graphFile = $uploadsPath->file($graphRelative);
diag $graphFile->stringify;
note $graphFile->stringify;
ok(-e $graphFile->stringify, 'graph exists');