Index: openacs-4/packages/acs-subsite/www/group-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/group-master.tcl,v
diff -u -N -r1.18 -r1.19
--- openacs-4/packages/acs-subsite/www/group-master.tcl	7 Aug 2017 23:47:58 -0000	1.18
+++ openacs-4/packages/acs-subsite/www/group-master.tcl	19 Jun 2018 13:35:52 -0000	1.19
@@ -42,7 +42,7 @@
     set login_url [ad_get_login_url -return]
 } else {
     # The browser claims to represent a user that we know about
-    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 [_ acs-subsite.Your_Account]
     set logout_url [ad_get_logout_url]
Index: openacs-4/packages/acs-templating/resources/masters/plain-streaming-head.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/resources/masters/plain-streaming-head.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/acs-templating/resources/masters/plain-streaming-head.tcl	7 Aug 2017 23:48:01 -0000	1.2
+++ openacs-4/packages/acs-templating/resources/masters/plain-streaming-head.tcl	19 Jun 2018 13:35:53 -0000	1.3
@@ -11,7 +11,7 @@
 set separator :
 set system_name [ad_system_name]
 set untrusted_user_id [ad_conn untrusted_user_id]
-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 whos_online_url [subsite::get_element -element url]shared/whos-online
 set num_users_online [lc_numeric [whos_online::num_users]]
 
Index: openacs-4/packages/ajaxhelper/www/doc/default-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ajaxhelper/www/doc/default-master.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/ajaxhelper/www/doc/default-master.tcl	27 Oct 2014 16:40:53 -0000	1.2
+++ openacs-4/packages/ajaxhelper/www/doc/default-master.tcl	19 Jun 2018 13:35:53 -0000	1.3
@@ -77,7 +77,7 @@
     set login_url [ad_get_login_url -return]
 } else {
     # The browser claims to represent a user that we know about
-    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 [_ acs-subsite.Your_Account]
     set logout_url [ad_get_logout_url]
Index: openacs-4/packages/general-comments/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/index.tcl,v
diff -u -N -r1.11 -r1.12
--- openacs-4/packages/general-comments/www/index.tcl	13 Jun 2018 13:40:24 -0000	1.11
+++ openacs-4/packages/general-comments/www/index.tcl	19 Jun 2018 13:35:53 -0000	1.12
@@ -29,7 +29,7 @@
 # this page with the proper parameters
 set return_url [ns_urlencode index?[export_ns_set_vars url]]
 
-set user_name [person::name -person_id $user_id]
+set user_name [acs_user::get_element -user_id $user_id -element name]
 
 set dimensional [list \
     [list approval "[_ general-comments.Status]" any [list \
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 -N -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 ""} {
Index: openacs-4/packages/notifications/www/manage.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/www/manage.tcl,v
diff -u -N -r1.11 -r1.12
--- openacs-4/packages/notifications/www/manage.tcl	7 Aug 2017 23:48:13 -0000	1.11
+++ openacs-4/packages/notifications/www/manage.tcl	19 Jun 2018 13:35:53 -0000	1.12
@@ -25,7 +25,7 @@
             label {[_ notifications.Frequency]}
         }
     }
-    set notice "[acs_community_member_link -user_id $user_id -label [person::name -person_id $user_id]] - [_ notifications.Notifications]"
+    set notice "[acs_community_member_link -user_id $user_id -label [acs_user::get_element -user_id $user_id -element name]] - [_ notifications.Notifications]"
 } else {
     set user_id [ad_conn user_id]
     set elements {
Index: openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/login.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/login.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/login.tcl	28 Mar 2018 15:39:20 -0000	1.3
+++ openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/login.tcl	19 Jun 2018 13:35:53 -0000	1.4
@@ -1,7 +1,7 @@
 set user_id [ad_conn user_id]
 set untrusted_user_id [ad_conn untrusted_user_id]
 if {[catch {
-   set user_name [person::name -person_id $untrusted_user_id]
+    set user_name [acs_user::get_element -user_id $untrusted_user_id -element name]
 } errorMsg]} {
    ns_log notice "Cannot determine user_name for user-id $untrusted_user_id"
    set user_name "Unknown"
Index: openacs-4/packages/openacs-default-theme/lib/plain-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/openacs-default-theme/lib/plain-master.tcl,v
diff -u -N -r1.6 -r1.7
--- openacs-4/packages/openacs-default-theme/lib/plain-master.tcl	7 Aug 2017 23:48:13 -0000	1.6
+++ openacs-4/packages/openacs-default-theme/lib/plain-master.tcl	19 Jun 2018 13:35:53 -0000	1.7
@@ -65,7 +65,7 @@
     set login_url [ad_get_login_url -return]
 } else {
     # The browser claims to represent a user that we know about
-    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 [_ acs-subsite.Your_Account]
     set logout_url [ad_get_logout_url]
Index: openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl	7 Aug 2017 23:48:13 -0000	1.3
+++ openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl	19 Jun 2018 13:35:53 -0000	1.4
@@ -11,7 +11,7 @@
 set separator :
 set system_name [ad_system_name]
 set untrusted_user_id [ad_conn untrusted_user_id]
-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 whos_online_url [subsite::get_element -element url]shared/whos-online
 set num_users_online [lc_numeric [whos_online::num_users]]
 
Index: openacs-4/packages/theme-selva/tcl/selva-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/theme-selva/tcl/selva-procs.tcl,v
diff -u -N -r1.15 -r1.16
--- openacs-4/packages/theme-selva/tcl/selva-procs.tcl	5 Apr 2018 14:44:09 -0000	1.15
+++ openacs-4/packages/theme-selva/tcl/selva-procs.tcl	19 Jun 2018 13:35:53 -0000	1.16
@@ -45,7 +45,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 [_ acs-subsite.Your_Account]
 	    set logout_url [ad_get_logout_url]
Index: openacs-4/packages/theme-selva/www/selva-site-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/theme-selva/www/selva-site-master.tcl,v
diff -u -N -r1.9 -r1.10
--- openacs-4/packages/theme-selva/www/selva-site-master.tcl	28 Jun 2015 13:01:06 -0000	1.9
+++ openacs-4/packages/theme-selva/www/selva-site-master.tcl	19 Jun 2018 13:35:53 -0000	1.10
@@ -39,7 +39,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 ""} {
Index: openacs-4/packages/theme-selva/www/doc/selva-site-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/theme-selva/www/doc/selva-site-master.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/theme-selva/www/doc/selva-site-master.tcl	28 Jun 2015 13:01:06 -0000	1.2
+++ openacs-4/packages/theme-selva/www/doc/selva-site-master.tcl	19 Jun 2018 13:35:53 -0000	1.3
@@ -31,7 +31,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 ""} {
Index: openacs-4/packages/theme-zen/lib/lrn-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/theme-zen/lib/lrn-master.tcl,v
diff -u -N -r1.16 -r1.17
--- openacs-4/packages/theme-zen/lib/lrn-master.tcl	7 Aug 2017 23:48:29 -0000	1.16
+++ openacs-4/packages/theme-zen/lib/lrn-master.tcl	19 Jun 2018 13:35:53 -0000	1.17
@@ -31,7 +31,7 @@
 # Get user information
 set sw_admin_p [acs_user::site_wide_admin_p -user_id $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 ""} {
Index: openacs-4/packages/theme-zen/tcl/navigation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/theme-zen/tcl/navigation-procs.tcl,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/theme-zen/tcl/navigation-procs.tcl	7 Aug 2017 23:48:29 -0000	1.7
+++ openacs-4/packages/theme-zen/tcl/navigation-procs.tcl	19 Jun 2018 13:35:53 -0000	1.8
@@ -47,7 +47,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 [_ acs-subsite.Your_Account]
             set logout_url [ad_get_logout_url]