Index: openacs-4/packages/acs-authentication/tcl/authority-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authority-procs.tcl,v diff -u -N -r1.29 -r1.30 --- openacs-4/packages/acs-authentication/tcl/authority-procs.tcl 27 Oct 2014 16:39:01 -0000 1.29 +++ openacs-4/packages/acs-authentication/tcl/authority-procs.tcl 7 Aug 2017 23:47:46 -0000 1.30 @@ -326,8 +326,7 @@ with_catch errmsg { array set doc_result [auth::sync::GetDocument -authority_id $authority_id] } { - global errorInfo - ns_log Error "Error getting sync document:\n$errorInfo" + ns_log Error "Error getting sync document:\n$::errorInfo" set doc_result(doc_status) failed_to_connect set doc_result(doc_message) $errmsg } @@ -373,8 +372,7 @@ $ack_doc } } { - global errorInfo - ns_log Error "Error processing sync document:\n$errorInfo" + ns_log Error "Error processing sync document:\n$::errorInfo" set message "Error processing sync document: $errmsg" } } else { @@ -564,3 +562,9 @@ } { return [auth::authority::get_id -short_name "local"] } + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: