Index: openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql,v
diff -u -N -r1.36 -r1.37
--- openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql	7 Aug 2017 23:48:11 -0000	1.36
+++ openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql	3 Nov 2017 15:32:49 -0000	1.37
@@ -213,10 +213,7 @@
 
   <fullquery name="fs::delete_folder.delete_folder">      
       <querytext>
-
-	begin
-	        file_storage.delete_folder(:folder_id, :cascade_p );
-	end;
+	select file_storage.delete_folder(:folder_id, :cascade_p ) from dual
       </querytext>
   </fullquery>