Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs-oracle.xql,v
diff -u -r1.4.2.1 -r1.4.2.2
--- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs-oracle.xql	28 May 2004 14:19:43 -0000	1.4.2.1
+++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs-oracle.xql	12 Aug 2004 07:07:53 -0000	1.4.2.2
@@ -16,4 +16,12 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="dotlrn_fs::remove_user.delete_folder">
+        <querytext>
+         begin
+            file_storage.delete_folder(:desired_folder_id,'f');
+         end;
+        </querytext>
+    </fullquery>
+
 </queryset>