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.11 -r1.12
--- openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql	11 Dec 2003 21:39:52 -0000	1.11
+++ openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-body-create.sql	2 Mar 2004 17:00:52 -0000	1.12
@@ -35,6 +35,10 @@
    party__new(new__segment_id, object_type, creation_date, creation_user,
              creation_ip, email, url, context_id);
 
+  update acs_objects
+  set title = new__segment_name
+  where object_id = v_segment_id;
+
   insert into rel_segments
    (segment_id, segment_name, group_id, rel_type)
   values