Index: openacs-4/packages/dotlrn/sql/postgresql/communities-package-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/postgresql/communities-package-create.sql,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/dotlrn/sql/postgresql/communities-package-create.sql	15 Jul 2002 18:32:24 -0000	1.4
+++ openacs-4/packages/dotlrn/sql/postgresql/communities-package-create.sql	5 Aug 2002 16:51:50 -0000	1.5
@@ -160,21 +160,8 @@
 
 -- dotlrn_community
 
-select define_function_args('dotlrn_community__new','community_id,parent_community_id,community_type,community_key,pretty_name,description,portal_id,non_member_portal_id,archived_p,package_id,join_policy,creation_date,creation_user,creation_ip,context_id');
+select define_function_args('dotlrn_community__new','community_id,parent_community_id,community_type,community_key,pretty_name,description,archived_p;f,portal_id,non_member_portal_id,package_id,join_policy,creation_date,creation_user,creation_ip,context_id');
 
-select define_function_args('dotlrn_community__set_active_dates','community_id,start_date,end_date');
-
-select define_function_args('dotlrn_community__delete','community_id');
-
-select define_function_args('dotlrn_community__name','community_id');
-
-select define_function_args('dotlrn_community__member_p','community_id,party_id');
-
-select define_function_args('dotlrn_community__admin_p','community_id,party_id');
-
-select define_function_args('dotlrn_community__url','community_id');
-
-
 create function dotlrn_community__new(integer,integer,varchar,varchar,varchar,varchar,varchar,integer,integer,integer,varchar,timestamp,integer,varchar,integer)
 returns integer as '
 DECLARE
@@ -194,7 +181,9 @@
         p_creation_ip                   alias for $14;
         p_context_id                    alias for $15;
         c_id                            integer;
+
 BEGIN
+
         c_id := acs_group__new (
             p_community_id,
             p_community_type,
@@ -236,6 +225,8 @@
 ' language 'plpgsql';
 
 
+select define_function_args('dotlrn_community__set_active_dates','community_id,start_date,end_date');
+
 create function dotlrn_community__set_active_dates(integer,date,date)
 returns integer as '
 DECLARE
@@ -252,6 +243,8 @@
 END;
 ' language 'plpgsql';
 
+select define_function_args('dotlrn_community__delete','community_id');
+
 create function dotlrn_community__delete(integer)
 returns integer as '
 DECLARE
@@ -267,6 +260,8 @@
 ' language 'plpgsql';
 
 
+select define_function_args('dotlrn_community__name','community_id');
+
 create function dotlrn_community__name(integer)
 returns varchar as '
 DECLARE
@@ -277,6 +272,8 @@
 ' language 'plpgsql';
 
 
+select define_function_args('dotlrn_community__member_p','community_id,party_id');
+
 create function dotlrn_community__member_p(integer,integer)
 returns boolean as '
 DECLARE
@@ -302,6 +299,8 @@
 ' language 'plpgsql';
 
 
+select define_function_args('dotlrn_community__admin_p','community_id,party_id');
+
 create function dotlrn_community__admin_p(integer,integer)
 returns boolean as '
 DECLARE
@@ -324,6 +323,8 @@
 ' language 'plpgsql';
 
 
+select define_function_args('dotlrn_community__url','community_id');
+
 create function dotlrn_community__url(integer)
 returns varchar as '
 DECLARE