Index: openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl,v
diff -u -r1.89 -r1.89.2.1
--- openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl	16 Jun 2015 07:13:27 -0000	1.89
+++ openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl	18 Aug 2015 12:22:04 -0000	1.89.2.1
@@ -241,8 +241,7 @@
     } {
         set result(auth_status) failed_to_connect
         set result(auth_message) $errmsg
-        global errorInfo
-        ns_log Error "auth::authenticate: error invoking authentication driver for authority_id = $authority_id: $errorInfo"
+        ns_log Error "auth::authenticate: error invoking authentication driver for authority_id = $authority_id: $::errorInfo"
     }
 
     # Returns:
@@ -1061,8 +1060,7 @@
 
     } on_error {
         # we got an error.  log it and signal failure.
-        global errorInfo
-        ns_log Error "Problem creating a new user: $errorInfo"
+        ns_log Error "Problem creating a new user: $::errorInfo"
         set error_p 1
     }
     
@@ -1197,8 +1195,7 @@
     if { $error_p } {
         set result(update_status) "failed_to_connect"
         set result(update_message) [_ acs-subsite.Error_update_account_info]
-        global errorInfo
-        ns_log Error "Error updating local account.\n$errorInfo"
+        ns_log Error "Error updating local account.\n$::errorInfo"
         return [array get result]
     }
 
@@ -1434,8 +1431,7 @@
                     with_catch errmsg {
                         auth::send_email_verification_email -user_id $user_id
                     } {
-                        global errorInfo
-                        ns_log Error "auth::check_local_account_status: Error sending out email verification email to email $email:\n$errorInfo"
+                        ns_log Error "auth::check_local_account_status: Error sending out email verification email to email $email:\n$::errorInfo"
                         set result(account_message) [_ acs-subsite.Error_sending_verification_mail]
                     }
                 }