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 -N -r1.93 -r1.94 --- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 12 Mar 2008 19:03:18 -0000 1.93 +++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 12 Mar 2008 20:15:53 -0000 1.94 @@ -435,19 +435,13 @@ set package_id [dotlrn_community::get_applet_package_id -community_id $community_id -applet_key [applet_key]] set portal_id [dotlrn::get_portal_id -user_id $user_id] set folder_id [fs::get_root_folder -package_id $package_id] - set community_portal_id [dotlrn_community::get_portal_id -community_id \ - $community_id] - if {[portal::portlet_visible_p \ - -portal_id $community_portal_id \ - -portlet_name fs_portlet]} { - - set args [ns_set create] - ns_set put $args package_id $package_id - ns_set put $args folder_id $folder_id - ns_set put $args param_action append - add_portlet_helper $portal_id $args - } + set args [ns_set create] + ns_set put $args package_id $package_id + ns_set put $args folder_id $folder_id + ns_set put $args param_action append + + add_portlet_helper $portal_id $args } ad_proc -public remove_user_from_community {