Index: openacs-4/packages/dotlrn/www/community-member.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/community-member.tcl,v diff -u -r1.9.2.3 -r1.9.2.4 --- openacs-4/packages/dotlrn/www/community-member.tcl 23 Apr 2003 06:05:47 -0000 1.9.2.3 +++ openacs-4/packages/dotlrn/www/community-member.tcl 30 May 2003 17:10:15 -0000 1.9.2.4 @@ -52,7 +52,7 @@ last_name, email, priv_email, - url, + url as home_url, creation_date, member_state from cc_users @@ -128,7 +128,8 @@ set folder_id [dotlrn_fs::get_user_shared_folder -user_id $user_id] set scope_fs_url "/packages/file-storage/www/folder-chunk" set n_past_days "" -set url "[site_node_object_map::get_url -object_id $folder_id]index?folder_id=$folder_id&n_past_days=99999" +set url "[site_node_object_map::get_url -object_id $folder_id]" +set folder_url "[site_node_object_map::get_url -object_id $folder_id]index?folder_id=$folder_id&n_past_days=99999" set context_bar [ad_context_bar "Community member"] set system_name [ad_system_name]