From cdcf737a3b4e6d3813ea6d357fa1286cef3e50cd Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Wed, 4 Feb 2004 02:45:10 +0000
Subject: [PATCH] got rid of magic groups

---
 lib/WebGUI/User.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/WebGUI/User.pm b/lib/WebGUI/User.pm
index db0674257..cf88f7ae9 100644
--- a/lib/WebGUI/User.pm
+++ b/lib/WebGUI/User.pm
@@ -61,6 +61,7 @@ sub _create {
 	my ($userId);
 	$userId = getNextId("userId");
 	WebGUI::SQL->write("insert into users (userId,dateCreated) values ($userId,".time().")");
+	WebGUI::Grouping::addUsersToGroups([$userId],[2,7[2,7]]);
         return $userId;
 }