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 -r1.9.2.2 -r1.9.2.3 --- openacs-4/packages/acs-content-repository/tcl/content-folder-procs.tcl 4 Jun 2005 17:13:40 -0000 1.9.2.2 +++ openacs-4/packages/acs-content-repository/tcl/content-folder-procs.tcl 17 Jun 2005 00:26:33 -0000 1.9.2.3 @@ -232,7 +232,7 @@ } { return [package_exec_plsql \ -var_list [list \ - folder_id $folder_id \ + [list folder_id $folder_id] \ ] \ content_folder get_label] } @@ -279,9 +279,9 @@ } { return [package_exec_plsql \ -var_list [list \ - folder_id $folder_id \ - content_type $content_type \ - include_subtypes $include_subtypes \ + [list folder_id $folder_id] \ + [list content_type $content_type] \ + [list include_subtypes $include_subtypes] \ ] \ content_folder is_registered] } @@ -295,7 +295,7 @@ @return t or f } { return [package_exec_plsql -var_list [list \ - folder_id $folder_id \ + [list folder_id $folder_id] \ ] content_folder is_root] }