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.2 -r1.3
--- openacs-4/packages/file-storage/www/folder-delete.tcl	25 Sep 2001 16:54:29 -0000	1.2
+++ openacs-4/packages/file-storage/www/folder-delete.tcl	5 Sep 2002 09:29:00 -0000	1.3
@@ -31,7 +31,7 @@
     folder_id:onevalue
     folder_name:onevalue
     blocked_p:onevalue
-    context_bar:onevalue
+    context:onevalue
 }
 
 # check for delete permission on the folder
@@ -62,7 +62,7 @@
     set folder_name [db_string folder_name "
     select label from cr_folders where folder_id = :folder_id"]
 
-    set context_bar [fs_context_bar_list -final "Delete" $folder_id]
+    set context [fs_context_bar_list -final "Delete" $folder_id]
 
     ad_return_template