Remove uncontrolled diagnostics, and done_testing.
This commit is contained in:
parent
7ef9c6e6f2
commit
29ca0f2168
1 changed files with 1 additions and 3 deletions
|
|
@ -24,7 +24,7 @@ use WebGUI::User;
|
||||||
|
|
||||||
use Test::More;
|
use Test::More;
|
||||||
|
|
||||||
plan tests => 14;
|
plan tests => 13;
|
||||||
|
|
||||||
use Data::Dumper;
|
use Data::Dumper;
|
||||||
|
|
||||||
|
|
@ -92,8 +92,6 @@ ok((! grep $_ eq $group->getId, @{ $userFred->getGroupIdsRecursive } ), '... rem
|
||||||
|
|
||||||
# eval { $userFred->session->stow->delete("gotGroupsForUser"); }; # blow the cache
|
# eval { $userFred->session->stow->delete("gotGroupsForUser"); }; # blow the cache
|
||||||
|
|
||||||
# note "after blowing the cache:";
|
|
||||||
|
|
||||||
# note "group->getAllUsers: " . Dumper $group->getAllUsers();
|
# note "group->getAllUsers: " . Dumper $group->getAllUsers();
|
||||||
# note "getGroupIdsRecursive: " . Dumper $userFred->getGroupIdsRecursive;
|
# note "getGroupIdsRecursive: " . Dumper $userFred->getGroupIdsRecursive;
|
||||||
# note "user->getGroups: " . Dumper $userFred->getGroups;
|
# note "user->getGroups: " . Dumper $userFred->getGroups;
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue