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

Bug #11082: Admin group has been removed from Visitor Group.

Browse source
This commit is contained in:
Colin Kuskie 2009-10-02 14:09:06 -07:00
parent 62cb3a4b9c
commit 26f7dd8bca
3 changed files with 20 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

1
docs/changelog/7.x.x.txt
View file

@ -36,6 +36,7 @@
- fixed #10544: Child assets under uncommitted parents
- fixed failure in test 250 of t/00_compile.t
- fixed #11084: option to view private profiles
- fixed #11082: Admin group in Visitor group?
7.8.0
- upgraded YUI to 2.8.0r4

18
docs/upgrades/upgrade_7.8.0-7.8.1.pl
View file

@ -37,6 +37,7 @@ removeOldITransactTables( $session );
removeSQLFormTables( $session );
fixBadRevisionDateColumns( $session );
removeImportCruft( $session );
removeAdminFromVisitorGroup( $session );
finish($session); # this line required
@ -50,6 +51,7 @@ finish($session); # this line required
# print "DONE!\n" unless $quiet;
#}
#----------------------------------------------------------------------------
# Describe what our function does
sub fixBadRevisionDateColumns {
my $session = shift;
@ -62,6 +64,7 @@ sub fixBadRevisionDateColumns {
print "Done.\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub removeSQLFormTables {
my $session = shift;
@ -74,6 +77,7 @@ sub removeSQLFormTables {
print "Done.\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub removeOldSubscriptionTables {
my $session = shift;
@ -84,6 +88,7 @@ sub removeOldSubscriptionTables {
print "Done.\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub removeOldITransactTables {
my $session = shift;
@ -92,6 +97,17 @@ sub removeOldITransactTables {
print "Done.\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub removeAdminFromVisitorGroup {
my $session = shift;
print "\tRemoving Admin group from Visitor group... " unless $quiet;
$session->db->write("delete from groupGroupings where groupId='3' and inGroup='1'");
print "Done.\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub fixWikis {
my $session = shift;
@ -101,6 +117,7 @@ sub fixWikis {
print "Done.\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub fixEMSTemplates {
my $session = shift;
@ -110,6 +127,7 @@ sub fixEMSTemplates {
print "Done.\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub removeImportCruft {
my $session = shift;

6
t/Group.t
View file

@ -75,7 +75,7 @@ my @ipTests = (
);
plan tests => (152 + scalar(@scratchTests) + scalar(@ipTests)); # increment this value for each test you create
plan tests => (151 + scalar(@scratchTests) + scalar(@ipTests)); # increment this value for each test you create
my $session = WebGUI::Test->session;
my $testCache = WebGUI::Cache->new($session, 'myTestKey');
@ -660,10 +660,6 @@ ok( !$cacheDude->isInGroup($gB->getId), "Cache dude is not a member of group B")
##Admin group inclusion check.
my $vgroup = WebGUI::Group->new($session, 1);
my $vgroups = $vgroup->getGroupsIn();
ok( isIn(3, @{ $vgroups }), 'Admin Group is in Group Visitor');
SKIP: {
skip("need to test expiration date in groupings interacting with recursive or not", 1);
ok(undef, "expiration date in groupings for getUser");