Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl,v diff -u -r1.86.6.10 -r1.86.6.11 --- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 21 Aug 2004 22:23:22 -0000 1.86.6.10 +++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 28 Aug 2004 23:30:59 -0000 1.86.6.11 @@ -169,13 +169,14 @@ -parameter "dotlrn_class_instance_folders_to_show" ] - if {[lsearch -exact $portlet_list $folder] != -1} { + if {[lsearch -exact [split $portlet_list ","] $folder] != -1} { # yes, this breaks the applet/portlet/portal abstraction # this folder is in the list, overwrite its folder id set element_id [portal::get_element_id_by_pretty_name \ -portal_id $portal_id \ -pretty_name $folder ] +ns_log Notice "Huh? Inside ... element_id: $element_id new folder_id: $a_folder_id" portal::set_element_param $element_id folder_id $a_folder_id }