Index: openacs-4/packages/file-storage/www/folder-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-delete.tcl,v
diff -u -r1.17.2.2 -r1.17.2.3
--- openacs-4/packages/file-storage/www/folder-delete.tcl	16 Apr 2019 20:00:05 -0000	1.17.2.2
+++ openacs-4/packages/file-storage/www/folder-delete.tcl	17 Apr 2019 09:37:58 -0000	1.17.2.3
@@ -61,7 +61,9 @@
         # The user has confirmed to delete the folder.
         #
         set parent_id [fs::get_parent -item_id $folder_id]
-        fs::delete_folder -folder_id $folder_id
+        fs::delete_folder \
+            -parent_id $parent_id \
+            -folder_id $folder_id
 
         ad_returnredirect "index?folder_id=$parent_id"
         ad_script_abort