Index: openacs-4/packages/file-storage/tcl/file-storage-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-procs.xql,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/file-storage/tcl/file-storage-procs.xql	15 Dec 2003 11:21:04 -0000	1.14
+++ openacs-4/packages/file-storage/tcl/file-storage-procs.xql	5 Jan 2004 02:16:58 -0000	1.15
@@ -131,4 +131,11 @@
       where item_id=:item_id
     </querytext>
   </fullquery>
+
+  <fullquery name="fs::set_folder_description.set_folder_description">
+    <querytext>
+      update cr_folders set description=:description
+      where folder_id = :folder_id
+    </querytext>
+  </fullquery>
 </queryset>