From d6aecc2d9082561de4b6a09a7bc01dd6586928c5 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Tue, 14 Oct 2008 23:15:31 +0000
Subject: [PATCH] Admins are in all groups, even group admin groups

---
 lib/WebGUI/Group.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lib/WebGUI/Group.pm b/lib/WebGUI/Group.pm
index b06ff419e..e93f2f7d1 100755
--- a/lib/WebGUI/Group.pm
+++ b/lib/WebGUI/Group.pm
@@ -1382,6 +1382,8 @@ sub userIsAdmin {
 		$self->session->db->write("update groupings set groupAdmin=? where groupId=? and userId=?",[$value, $self->getId, $userId]);
 		return $value;
 	} else {
+        my $user = WebGUI::User->new($self->session, $userId);
+        return 1 if $user->isInGroup(3);
 		my ($admin) = $self->session->db->quickArray("select groupAdmin from groupings where groupId=? and userId=?", [$self->getId, $userId]);
 		return ($admin ? 1 : 0);
 	}