Index: openacs-4/packages/acs-events/sql/oracle/activity-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-events/sql/oracle/activity-create.sql,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-events/sql/oracle/activity-create.sql	4 Mar 2004 14:52:38 -0000	1.5
+++ openacs-4/packages/acs-events/sql/oracle/activity-create.sql	12 Mar 2004 18:48:48 -0000	1.6
@@ -200,6 +200,7 @@
         new_activity_id := acs_object.new(
             object_id     => activity_id,
             object_type   => object_type,
+            title         => name,
             creation_date => creation_date,
             creation_user => creation_user,
             creation_ip   => creation_ip,
@@ -265,6 +266,10 @@
                html_p      = nvl(edit.html_p, html_p),
                status_summary = nvl(edit.status_summary, status_summary)
         where activity_id  = edit.activity_id;
+
+        update acs_objects
+        set    title = nvl(edit.name, title)
+        where object_id = edit.activity_id;
     end edit;
 
     procedure object_map (
