Index: openacs-4/packages/photo-album/tcl/photo-album-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/photo-album/tcl/photo-album-procs.tcl,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/photo-album/tcl/photo-album-procs.tcl 26 Jul 2004 13:07:42 -0000 1.11 +++ openacs-4/packages/photo-album/tcl/photo-album-procs.tcl 24 Feb 2005 11:02:33 -0000 1.12 @@ -146,7 +146,11 @@ set root_folder_id [pa_get_root_folder] if {$item_id == $root_folder_id} { - return [list $final] + if {![empty_string_p $final]} { + return [list $final] + } else { + return {} + } } if [empty_string_p $final] {