Index: openacs-4/packages/dotlrn/www/admin/user.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/dotlrn/www/admin/user.tcl	29 Sep 2013 13:49:46 -0000	1.27
+++ openacs-4/packages/dotlrn/www/admin/user.tcl	1 Nov 2013 21:08:34 -0000	1.28
@@ -53,11 +53,11 @@
     ad_return_complaint 1 "<li>[_ dotlrn.couldnt_find_user_id [list user_id $user_id]]</li>"
     ad_script_abort
 }
-if {[empty_string_p $screen_name]} {
+if {$screen_name eq ""} {
     set screen_name "([_ dotlrn.none_set_up])"
 }
 set registration_date [lc_time_fmt $registration_date "%q"]
-if {![empty_string_p $last_visit]} {
+if {$last_visit ne ""} {
     set last_visit [lc_time_fmt $last_visit "%q"]
 }