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.20 -r1.21
--- openacs-4/packages/acs-subsite/www/group-master.tcl	19 Jun 2018 13:45:23 -0000	1.20
+++ openacs-4/packages/acs-subsite/www/group-master.tcl	27 Jun 2018 16:11:45 -0000	1.21
@@ -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+    set user_name [person::name -person_id $untrusted_user_id]
     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.3 -r1.4
--- openacs-4/packages/acs-templating/resources/masters/plain-streaming-head.tcl	19 Jun 2018 13:35:53 -0000	1.3
+++ openacs-4/packages/acs-templating/resources/masters/plain-streaming-head.tcl	27 Jun 2018 16:11:45 -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+set user_name [person::name -person_id $untrusted_user_id]
 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.4 -r1.5
--- openacs-4/packages/ajaxhelper/www/doc/default-master.tcl	19 Jun 2018 13:45:23 -0000	1.4
+++ openacs-4/packages/ajaxhelper/www/doc/default-master.tcl	27 Jun 2018 16:11:45 -0000	1.5
@@ -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+    set user_name [person::name -person_id $untrusted_user_id]
     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.13 -r1.14
--- openacs-4/packages/general-comments/www/index.tcl	19 Jun 2018 13:45:23 -0000	1.13
+++ openacs-4/packages/general-comments/www/index.tcl	27 Jun 2018 16:11:45 -0000	1.14
@@ -29,7 +29,7 @@
 # this page with the proper parameters
 set return_url [ns_urlencode index?[export_ns_set_vars url]]
 
-set user_name [acs_user::get_element -user_id $user_id -element name]
+set user_name [person::name -person_id $user_id]
 
 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.8 -r1.9
--- openacs-4/packages/new-portal/www/themes/kelp-theme/site-master-kelp.tcl	19 Jun 2018 13:45:23 -0000	1.8
+++ openacs-4/packages/new-portal/www/themes/kelp-theme/site-master-kelp.tcl	27 Jun 2018 16:11:45 -0000	1.9
@@ -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+    set user_name [person::name -person_id $untrusted_user_id]
     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.13 -r1.14
--- openacs-4/packages/notifications/www/manage.tcl	19 Jun 2018 13:45:23 -0000	1.13
+++ openacs-4/packages/notifications/www/manage.tcl	27 Jun 2018 16:11:45 -0000	1.14
@@ -25,7 +25,7 @@
             label {[_ notifications.Frequency]}
         }
     }
-    set notice "[acs_community_member_link -user_id $user_id -label [acs_user::get_element -user_id $user_id -element name]] - [_ notifications.Notifications]"
+    set notice "[acs_community_member_link -user_id $user_id -label [person::name -person_id $user_id]] - [_ 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.5 -r1.6
--- openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/login.tcl	19 Jun 2018 13:45:23 -0000	1.5
+++ openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/login.tcl	27 Jun 2018 16:11:45 -0000	1.6
@@ -1,10 +1,10 @@
 set user_id [ad_conn user_id]
 set untrusted_user_id [ad_conn untrusted_user_id]
 if {[catch {
-    set user_name [acs_user::get_element -user_id $untrusted_user_id -element name]
+    set user_name [person::name -person_id $untrusted_user_id]
 } errorMsg]} {
-   ns_log notice "Cannot determine user_name for user-id $untrusted_user_id"
-   set user_name "Unknown"
+    ns_log notice "Cannot determine user_name for user-id $untrusted_user_id"
+    set user_name "Unknown"
 }
 set system_name [ad_system_name]
 
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.8 -r1.9
--- openacs-4/packages/openacs-default-theme/lib/plain-master.tcl	19 Jun 2018 13:45:23 -0000	1.8
+++ openacs-4/packages/openacs-default-theme/lib/plain-master.tcl	27 Jun 2018 16:11:45 -0000	1.9
@@ -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+    set user_name [person::name -person_id $untrusted_user_id]
     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.4 -r1.5
--- openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl	19 Jun 2018 13:35:53 -0000	1.4
+++ openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl	27 Jun 2018 16:11:45 -0000	1.5
@@ -11,7 +11,7 @@
 set separator :
 set system_name [ad_system_name]
 set untrusted_user_id [ad_conn untrusted_user_id]
-set user_name [acs_user::get_element -user_id $untrusted_user_id -element name]
+set user_name [person::name -person_id $untrusted_user_id]
 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.17 -r1.18
--- openacs-4/packages/theme-selva/tcl/selva-procs.tcl	19 Jun 2018 13:45:23 -0000	1.17
+++ openacs-4/packages/theme-selva/tcl/selva-procs.tcl	27 Jun 2018 16:11:45 -0000	1.18
@@ -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+            set user_name [person::name -person_id $untrusted_user_id]
             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.11 -r1.12
--- openacs-4/packages/theme-selva/www/selva-site-master.tcl	19 Jun 2018 13:45:23 -0000	1.11
+++ openacs-4/packages/theme-selva/www/selva-site-master.tcl	27 Jun 2018 16:11:45 -0000	1.12
@@ -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+    set user_name [person::name -person_id $untrusted_user_id]
     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.4 -r1.5
--- openacs-4/packages/theme-selva/www/doc/selva-site-master.tcl	19 Jun 2018 13:45:23 -0000	1.4
+++ openacs-4/packages/theme-selva/www/doc/selva-site-master.tcl	27 Jun 2018 16:11:45 -0000	1.5
@@ -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+    set user_name [person::name -person_id $untrusted_user_id]
     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.18 -r1.19
--- openacs-4/packages/theme-zen/lib/lrn-master.tcl	19 Jun 2018 13:45:23 -0000	1.18
+++ openacs-4/packages/theme-zen/lib/lrn-master.tcl	27 Jun 2018 16:11:45 -0000	1.19
@@ -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+    set user_name [person::name -person_id $untrusted_user_id]
     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.9 -r1.10
--- openacs-4/packages/theme-zen/tcl/navigation-procs.tcl	19 Jun 2018 13:45:23 -0000	1.9
+++ openacs-4/packages/theme-zen/tcl/navigation-procs.tcl	27 Jun 2018 16:11:45 -0000	1.10
@@ -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 [acs_user::get_element -user_id $untrusted_user_id -element name]
+            set user_name [person::name -person_id $untrusted_user_id]
             set pvt_home_url [ad_pvt_home]
             set pvt_home_name [_ acs-subsite.Your_Account]
             set logout_url [ad_get_logout_url]