Index: openacs-4/packages/acs-tcl/tcl/apm-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs.xql,v
diff -u -r1.17 -r1.18
--- openacs-4/packages/acs-tcl/tcl/apm-procs.xql	30 Oct 2003 09:12:09 -0000	1.17
+++ openacs-4/packages/acs-tcl/tcl/apm-procs.xql	2 Mar 2004 17:01:38 -0000	1.18
@@ -87,6 +87,14 @@
     </querytext>
   </fullquery>
   
+  <fullquery name="apm_parameter_update.object_title_update">      
+    <querytext>
+	update acs_objects
+	set title = :parameter_name
+	where object_id = :parameter_id
+    </querytext>
+  </fullquery>
+  
   <fullquery name="apm_parameter_unregister.all_parameters_packages">      
     <querytext>
       select package_id, parameter_id, parameter_name