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.4 -r1.17.2.5 --- openacs-4/packages/file-storage/www/folder-delete.tcl 16 Nov 2019 14:40:40 -0000 1.17.2.4 +++ openacs-4/packages/file-storage/www/folder-delete.tcl 7 Feb 2022 14:47:25 -0000 1.17.2.5 @@ -14,13 +14,11 @@ ad_complain "[_ file-storage.lt_The_specified_folder__1]" } } -} -validate { not_root_folder -requires {folder_id} { if { $folder_id == [fs_get_root_folder] } { ad_complain "[_ file-storage.lt_You_may_not_delete_th]" } } - } -properties { folder_id:onevalue folder_name:onevalue