Index: openacs-4/packages/acs-content-repository/tcl/content-folder-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/content-folder-procs.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/acs-content-repository/tcl/content-folder-procs.tcl	1 Jul 2004 16:45:03 -0000	1.3
+++ openacs-4/packages/acs-content-repository/tcl/content-folder-procs.tcl	1 Jul 2004 17:15:55 -0000	1.4
@@ -88,9 +88,8 @@
 } {
     return [package_exec_plsql \
 		-var_list [list \
-			       folder_id $folder_id \
-			       cascape_p $cascade_p
-			  ] \
+			       [list folder_id $folder_id ] \
+			       [list cascade_p $cascade_p] ] \
 		content_folder delete ]
 }
 
@@ -244,7 +243,7 @@
 } {
     return [package_exec_plsql \
 		-var_list [list \
-			       folder_id $folder_id \
+			       [list folder_id $folder_id ] \
 			      ] \
 		content_folder is_empty]
 }