Index: openacs-4/packages/acs-authentication/tcl/authority-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authority-procs.xql,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-authentication/tcl/authority-procs.xql	4 Mar 2004 14:52:35 -0000	1.5
+++ openacs-4/packages/acs-authentication/tcl/authority-procs.xql	12 Mar 2004 18:48:45 -0000	1.6
@@ -2,6 +2,14 @@
 
 <queryset>
 
+  <fullquery name="auth::authority::edit.update_object_title">
+      <querytext>
+	    update acs_objects
+	    set title = :new_short_name
+	    where object_id = :authority_id
+      </querytext>
+  </fullquery>
+
   <fullquery name="auth::authority::get_authority_options.select_authorities">
       <querytext>
           select pretty_name, authority_id