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 -N -r1.19.2.2 -r1.19.2.3
--- openacs-4/packages/dotlrn/www/admin/user.tcl 26 Sep 2005 09:07:00 -0000 1.19.2.2
+++ openacs-4/packages/dotlrn/www/admin/user.tcl 20 Jul 2006 03:47:13 -0000 1.19.2.3
@@ -56,7 +56,7 @@
ad_script_abort
}
if {[empty_string_p $screen_name]} {
- set screen_name "<[_ dotlrn.none_set_up]>"
+ set screen_name "([_ dotlrn.none_set_up])"
}
set registration_date [lc_time_fmt $registration_date "%q"]
if {![empty_string_p $last_visit]} {
@@ -75,7 +75,7 @@
set portrait_p 1
}
-set change_state_links "\[[join [ad_registration_finite_state_machine_admin_links $member_state $email_verified_p $user_id $return_url] " | "]\]"
+set change_state_links "\[ [join [ad_registration_finite_state_machine_admin_links $member_state $email_verified_p $user_id $return_url] " | "] \]"
db_multirow member_classes select_member_classes {} {
set role_pretty_name [dotlrn_community::get_role_pretty_name -community_id $class_instance_id -rel_type $rel_type]