From 4eb013ef03d1cf5ac1d74c2ccda981dbbbffcc86 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Tue, 8 Jun 2010 08:42:43 -0700 Subject: [PATCH] Remove uncontrolled diagnostics, and done_testing. --- t/Inbox/Groups.t | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/t/Inbox/Groups.t b/t/Inbox/Groups.t index e56abbbda..549351228 100644 --- a/t/Inbox/Groups.t +++ b/t/Inbox/Groups.t @@ -24,9 +24,9 @@ use WebGUI::User; use Test::More; -use Data::Dumper; +plan tests => 13; -$| = 1; +use Data::Dumper; #---------------------------------------------------------------------------- @@ -86,9 +86,9 @@ $group->deleteUsers([ $userFred->userId ]); ok((! grep $_ eq $userFred->userId, @{ $group->getAllUsers() } ), 'User removed from group'); ok((! grep $_ eq $group->getId, @{ $userFred->getGroupIdsRecursive } ), 'User removed from group'); -warn "group->getAllUsers: " . Dumper $group->getAllUsers(); -warn "getGroupIdsRecursive: " . Dumper $userFred->getGroupIdsRecursive; -warn "user->getGroups: " . Dumper $userFred->getGroups; +note "group->getAllUsers: " . Dumper $group->getAllUsers(); +note "getGroupIdsRecursive: " . Dumper $userFred->getGroupIdsRecursive; +note "user->getGroups: " . Dumper $userFred->getGroups; eval{ $userFred->session->stow->delete("gotGroupsForUser"); }; # blow the cache