Index: openacs-4/packages/acs-subsite/www/shared/portrait.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/portrait.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-subsite/www/shared/portrait.tcl	13 Mar 2001 22:59:26 -0000	1.1
+++ openacs-4/packages/acs-subsite/www/shared/portrait.tcl	22 Jan 2002 20:08:00 -0000	1.2
@@ -41,8 +41,8 @@
     set widthheight_param ""
 }
 
-set context_bar [ad_context_bar_ws_or_index [list "/shared/community-member.tcl?[export_url_vars user_id]" "One Member"] "Portrait"]
+set context_bar [ad_context_bar_ws_or_index [list [acs_community_member_url -user_id $user_id] "One Member"] "Portrait"]
 set export_vars [export_url_vars user_id]
 set publish_date [util_AnsiDatetoPrettyDate $publish_date]
 
-ad_return_template
\ No newline at end of file
+ad_return_template