Index: openacs-4/packages/acs-subsite/tcl/application-group-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/application-group-procs-oracle.xql,v diff -u -r1.2 -r1.2.2.1 --- openacs-4/packages/acs-subsite/tcl/application-group-procs-oracle.xql 12 May 2002 20:57:02 -0000 1.2 +++ openacs-4/packages/acs-subsite/tcl/application-group-procs-oracle.xql 9 Mar 2003 22:56:23 -0000 1.2.2.1 @@ -114,7 +114,7 @@ object_type => :group_type, group_name => :group_name, package_id => :package_id, - context_id => :context_id, + context_id => :parent_group_id, creation_user => :creation_user, creation_ip => :creation_ip, email => :email, @@ -125,22 +125,4 @@ - - - - - begin - :1 := composition_rel.new ( - rel_type => 'composition_rel', - object_id_one => :parent_group_id, - object_id_two => :group_id, - creation_user => :creation_user, - creation_ip => :creation_ip - ); - end; - - - - -