Index: openacs-4/packages/acs-subsite/sql/postgresql/application-groups-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/sql/postgresql/application-groups-create.sql,v
diff -u -N -r1.10 -r1.11
--- openacs-4/packages/acs-subsite/sql/postgresql/application-groups-create.sql	25 Sep 2006 21:16:34 -0000	1.10
+++ openacs-4/packages/acs-subsite/sql/postgresql/application-groups-create.sql	30 Jan 2009 02:36:56 -0000	1.11
@@ -36,9 +36,9 @@
                                 unique (package_id)
 );
 
-select define_function_args('application_group__new','group_id,object_type;application_group,creation_date;now(),creation_user,creation_ip,email,url,group_name,package_id,context_id');
+select define_function_args('application_group__new','group_id,object_type;application_group,creation_date;now(),creation_user,creation_ip,email,url,group_name,package_id,join_policy,context_id');
 
-create function application_group__new(integer,varchar,timestamptz,integer,varchar,varchar,varchar,varchar,integer,integer)
+create function application_group__new(integer,varchar,timestamptz,integer,varchar,varchar,varchar,varchar,integer,varchar,integer)
 returns integer as '
 declare
   new__group_id              alias for $1;
@@ -50,7 +50,8 @@
   new__url                   alias for $7; -- default null,
   new__group_name            alias for $8;
   new__package_id            alias for $9;
-  new__context_id	     alias for $10; -- default null
+  new__join_policy           alias for $10;
+  new__context_id	     alias for $11; -- default null
   v_group_id		     application_groups.group_id%TYPE;
 begin
   v_group_id := acs_group__new (
@@ -62,7 +63,7 @@
     new__email,
     new__url,
     new__group_name,
-    null,
+    new__join_policy,
     new__context_id
   );
 
