Index: openacs-4/packages/acs-admin/www/users/one.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/one.tcl,v diff -u -N -r1.19 -r1.20 --- openacs-4/packages/acs-admin/www/users/one.tcl 5 Jan 2018 22:58:04 -0000 1.19 +++ openacs-4/packages/acs-admin/www/users/one.tcl 27 Jun 2018 16:50:00 -0000 1.20 @@ -9,12 +9,13 @@ user_id:naturalnum,notnull } -ad_try { - acs_user::get -user_id $user_id -array user_info -} on error {errorMsg} { + +acs_user::get -user_id $user_id -array user_info +if {[array size user_info] == 0} { ad_return_complaint 1 "
  • We couldn't find user #$user_id; perhaps this person was deleted?" - return + ad_script_abort } + set user_info(last_visit_pretty) [lc_time_fmt $user_info(last_visit_ansi) "%q %X"] set user_info(creation_date_pretty) [lc_time_fmt $user_info(creation_date) "%q"] set user_info(url) [acs_community_member_url -user_id $user_id]