Index: openacs-4/packages/file-storage/www/folder-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-chunk.tcl,v diff -u -N -r1.21.2.3 -r1.21.2.4 --- openacs-4/packages/file-storage/www/folder-chunk.tcl 30 Mar 2004 02:00:26 -0000 1.21.2.3 +++ openacs-4/packages/file-storage/www/folder-chunk.tcl 25 Apr 2004 18:16:10 -0000 1.21.2.4 @@ -51,7 +51,11 @@ set root_folder_id [fs::get_root_folder] } -set folder_path [db_exec_plsql get_folder_path {}] +if {![string equal $root_folder_id $folder_id]} { + set folder_path [db_exec_plsql get_folder_path {}] +} else { + set folder_path "" +} set actions [list]