From d888c5c134128808124996099ab427496c5bc4ef Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Fri, 4 Aug 2006 05:15:38 +0000
Subject: [PATCH] add explicit test for new users being added to group Everyone
 on creation

---
 t/User.t | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/t/User.t b/t/User.t
index 5e1d7072d..a0fcfce89 100644
--- a/t/User.t
+++ b/t/User.t
@@ -18,7 +18,7 @@ use WebGUI::Utility;
 use WebGUI::Cache;
 
 use WebGUI::User;
-use Test::More tests => 81; # increment this value for each test you create
+use Test::More tests => 82; # increment this value for each test you create
 
 my $session = WebGUI::Test->session;
 
@@ -260,6 +260,7 @@ $cm->ipFilter(defined $origFilter ? $origFilter : '');
 
 ##Test for group membership
 $user = WebGUI::User->new($session, "new");
+ok($user->isInGroup(7), "addToGroups: New user is in group 7(Everyone)");
 
 $user->addToGroups([3]);