Index: openacs-4/packages/new-portal/www/themes/kelp-theme/site-master-kelp.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/themes/kelp-theme/site-master-kelp.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/new-portal/www/themes/kelp-theme/site-master-kelp.tcl	7 Aug 2017 23:48:12 -0000	1.6
+++ openacs-4/packages/new-portal/www/themes/kelp-theme/site-master-kelp.tcl	19 Jun 2018 13:35:53 -0000	1.7
@@ -26,7 +26,7 @@
 set user_id [ad_conn user_id]
 set untrusted_user_id [ad_conn untrusted_user_id]
 if { $untrusted_user_id != 0 } {
-    set user_name [person::name -person_id $untrusted_user_id]
+    set user_name [acs_user::get_element -user_id $untrusted_user_id -element name]
     set pvt_home_url [ad_pvt_home]
     set pvt_home_name [ad_pvt_home_name]
     if {$pvt_home_name eq ""} {