Index: openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl,v
diff -u -r1.118 -r1.118.2.1
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl 19 Jun 2015 19:52:03 -0000 1.118
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl 17 Aug 2015 17:45:04 -0000 1.118.2.1
@@ -775,13 +775,12 @@
Writes an error to the connection.
- @param message The message to write (pulled from $errorInfo
if none is specified).
+ @param message The message to write (pulled from $::errorInfo
if none is specified).
} {
if { ![info exists message] } {
- global errorInfo
- # We need 'message' to be a copy, because errorInfo will get overridden by some of the template parsing below
- set message $errorInfo
+ # We need 'message' to be a copy, because errorInfo will get overridden by some of the template parsing below
+ set message $::errorInfo
}
set error_url "[ad_url][ad_conn url]?[export_entire_form_as_url_vars]"
# set error_file [template::util::url_to_file $error_url]