Index: openacs-4/packages/acs-authentication/tcl/test/acs-authentication-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/test/acs-authentication-procs.tcl,v diff -u -r1.43 -r1.44 --- openacs-4/packages/acs-authentication/tcl/test/acs-authentication-procs.tcl 27 Oct 2014 16:39:02 -0000 1.43 +++ openacs-4/packages/acs-authentication/tcl/test/acs-authentication-procs.tcl 27 Apr 2015 15:28:16 -0000 1.44 @@ -221,13 +221,13 @@ array set elm_msgs $user_info(element_messages) if { [aa_true "element_message(email) exists" \ - [expr {[info exists elm_msgs(email)] && $elm_msgs(email) ne ""}] + [expr {[info exists elm_msgs(email)] && $elm_msgs(email) ne ""}] ]} { aa_log "element_message(email) = $elm_msgs(email)" } - if { [aa_true "element_message(first_names) exists" [info exists elm_msgs(first_names)] + if { [aa_true "element_message(first_names) exists" [info exists elm_msgs(first_names)] ]} { aa_log "element_message(first_names) = $elm_msgs(first_names)" } - if { [aa_true "element_message(last_name) exists" [info exists elm_msgs(last_name)] + if { [aa_true "element_message(last_name) exists" [info exists elm_msgs(last_name)] ]} { aa_log "element_message(last_name) = $elm_msgs(last_name)" } }