Index: openacs-4/packages/acs-kernel/sql/postgresql/apm-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/apm-create.sql,v
diff -u -r1.48 -r1.49
--- openacs-4/packages/acs-kernel/sql/postgresql/apm-create.sql	26 Jan 2004 15:39:45 -0000	1.48
+++ openacs-4/packages/acs-kernel/sql/postgresql/apm-create.sql	2 Mar 2004 17:00:52 -0000	1.49
@@ -227,6 +227,8 @@
 
 create index apm_packages_package_key_idx on apm_packages (package_key);
 
+alter table acs_objects add foreign key (package_id) references apm_packages(package_id);
+
 comment on table apm_packages is '
    This table maintains the list of all package instances in the sytem. 
 ';
@@ -1340,6 +1342,9 @@
        now(),
        null,
        null,
+       null,
+       ''t'',
+       register_paramer__package_key || '': Parameter '' || register_parameter__parameter_name,
        null
     );
     
@@ -1396,6 +1401,12 @@
             max_n_values   = coalesce(update_parameter__max_n_values, max_n_values)
       where parameter_id = update_parameter__parameter_id;
 
+    update acs_objects
+       set title = (select package_key || '': Parameter '' || parameter_name
+                    from apm_parameters
+                    where parameter_id = update_parameter__parameter_id)
+     where object_id = update_parameter__parameter_id;
+
     return parameter_id;
      
 end;' language 'plpgsql';
@@ -1628,6 +1639,11 @@
 	 v_instance_name := new__instance_name;
        end if;
 
+       update acs_objects
+       set title = v_instance_name,
+           package_id = v_package_id
+       where object_id = v_package_id;
+
        select package_type into v_package_type
        from apm_package_types
        where package_key = new__package_key;
@@ -1809,6 +1825,9 @@
                 now(),
                 null,
                 null,
+                null,
+                ''t'',
+                apm_pkg_ver__package_key || '', Version '' || apm_pkg_ver__version_name,
                 null
         );
 
@@ -1904,6 +1923,12 @@
 	    from apm_package_versions
 	    where version_id = copy__version_id;
     
+        update acs_objects
+        set title = (select v.package_key || '', Version '' || v.version_name
+                     from apm_package_versions v
+                     where v.version_id = copy__version_id)
+        where object_id = copy__version_id;
+
 	insert into apm_package_dependencies(dependency_id, version_id, dependency_type, service_uri, service_version)
 	    select nextval(''t_acs_object_id_seq''), v_version_id, dependency_type, service_uri, service_version
 	    from apm_package_dependencies