Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -r1.203 -r1.204
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	1 Feb 2009 22:18:46 -0000	1.203
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	13 Feb 2009 02:10:13 -0000	1.204
@@ -199,7 +199,6 @@
         ns_set put $extra_vars pretty_plural $pretty_name
         ns_set put $extra_vars description $description
         ns_set put $extra_vars context_id $dotlrn_package_id
-        ns_set put $extra_vars package_id $dotlrn_package_id
 
         db_transaction {
             set user_id [ad_conn user_id]
@@ -272,7 +271,7 @@
 
             # Set up the node
             dotlrn_community::set_package_id $community_id $package_id
-
+            
             # update the portal_id and non_member_portal_id
             db_dml update_portal_ids {}
 
@@ -377,6 +376,7 @@
         Update the node ID for the community
     } {
         db_dml update_package_id {}
+        db_dml update_application_group_package_id {}
 	util_memoize_flush "dotlrn_community::get_package_id_not_cached $community_id"
     }