Index: openacs-4/packages/profile-provider/sql/oracle/profiled-group-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/profile-provider/sql/oracle/profiled-group-create.sql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/profile-provider/sql/oracle/profiled-group-create.sql 9 Aug 2002 20:56:32 -0000 1.4 +++ openacs-4/packages/profile-provider/sql/oracle/profiled-group-create.sql 30 Sep 2003 13:11:41 -0000 1.5 @@ -64,7 +64,7 @@ creation_ip in acs_objects.creation_ip%TYPE default null ) return profiled_groups.group_id%TYPE; - procedure delete ( + procedure del ( group_id in profiled_groups.group_id%TYPE ); end profiled_group; @@ -107,16 +107,16 @@ return v_group_id; end new; - procedure delete ( + procedure del ( group_id in profiled_groups.group_id%TYPE ) is begin delete from profiled_groups - where profiled_groups.group_id = profiled_group.delete.group_id; + where profiled_groups.group_id = profiled_group.del.group_id; - acs_group.delete(group_id); - end delete; + acs_group.del(group_id); + end del; end profiled_group; / show errors