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.1 -r1.9.2.2 --- openacs-4/packages/acs-content-repository/tcl/content-folder-procs.tcl 31 May 2005 18:07:34 -0000 1.9.2.1 +++ openacs-4/packages/acs-content-repository/tcl/content-folder-procs.tcl 4 Jun 2005 17:13:40 -0000 1.9.2.2 @@ -216,9 +216,9 @@ @return item_id of content item named "index" in folder_id } { return [package_exec_plsql \ - -var_list [list \ + -var_list [list [list \ folder_id $folder_id \ - ] \ + ]] \ content_folder get_index_page] } @@ -337,4 +337,4 @@ Returns the folder_id of the package instance } { return [db_string get_folder_id "select folder_id from cr_folders where package_id=:package_id"] -} \ No newline at end of file +}