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

Unify the list of protected groups into Group->vitalGroup. Refactor

Browse source 
WebGUI::Test and Operation/Group to use that list.
This commit is contained in:
Colin Kuskie 2009-07-05 20:36:46 +00:00
parent da41082cbf
commit 6137b681f3
3 changed files with 181 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

2
t/lib/WebGUI/Test.pm
View file

@ -152,7 +152,7 @@ END {
my $Test = Test::Builder->new;
GROUP: foreach my $group (@groupsToDelete) {
my $groupId = $group->getId;
next GROUP if any { $groupId eq $_ } qw/1 2 3 4 6 7 8 11 12 13 14 pbgroup000000000000015 pbgroup000000000000016 pbgroup000000000000017 /;
next GROUP if WebGUI::Group->vitalGroup($groupId);
my $newGroup = WebGUI::Group->new($SESSION, $groupId);
$newGroup->delete if $newGroup;
}