Index: openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql	18 Apr 2001 05:20:54 -0000	1.5
+++ openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql	20 Apr 2001 02:03:49 -0000	1.6
@@ -87,6 +87,13 @@
   
 end;' language 'plpgsql';
 
+create function rel_segment__get_or_new(integer,varchar) returns integer as '
+declare
+        gid     alias for $1;
+        typ     alias for $2;
+begin
+        return rel_segment__get_or_new(gid,typ,null);
+end;' language 'plpgsql';
 
 -- function get_or_new
 create function rel_segment__get_or_new (integer,varchar,varchar)
@@ -114,7 +121,6 @@
            and acs_object_types.object_type = get_or_new__rel_type;
 
       end if;
-      raise notice ''segment name = %'', v_segment_name;
 
       v_segment_id := rel_segment__new (
           null,