Index: openacs-4/packages/acs-subsite/www/admin/applications/application-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/applications/application-add.tcl,v diff -u -r1.12 -r1.12.2.1 --- openacs-4/packages/acs-subsite/www/admin/applications/application-add.tcl 27 Oct 2014 16:39:48 -0000 1.12 +++ openacs-4/packages/acs-subsite/www/admin/applications/application-add.tcl 18 Aug 2015 12:34:36 -0000 1.12.2.1 @@ -88,8 +88,7 @@ -package_name $instance_name \ -package_key $package_key } errmsg] } { - global errorInfo - ns_log Error "Error creating application: $errmsg\n$errorInfo" + ns_log Error "Error creating application: $errmsg\n$::errorInfo" ad_return_error "Problem Creating Application" "We had a problem creating the application." } } -edit_data { Index: openacs-4/packages/acs-subsite/www/admin/applications/multiple-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/applications/multiple-add.tcl,v diff -u -r1.2 -r1.2.6.1 --- openacs-4/packages/acs-subsite/www/admin/applications/multiple-add.tcl 15 Apr 2011 10:29:16 -0000 1.2 +++ openacs-4/packages/acs-subsite/www/admin/applications/multiple-add.tcl 18 Aug 2015 12:34:36 -0000 1.2.6.1 @@ -38,8 +38,7 @@ -package_key $one_package_key } } errmsg] } { - global errorInfo - ns_log Error "Error creating application: $errmsg\n$errorInfo" + ns_log Error "Error creating application: $errmsg\n$::errorInfo" ad_return_error "Problem Creating Application" "We had a problem creating the application." } } -after_submit { Index: openacs-4/packages/acs-subsite/www/members/member-invite.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/members/member-invite.tcl,v diff -u -r1.10 -r1.10.6.1 --- openacs-4/packages/acs-subsite/www/members/member-invite.tcl 7 Apr 2011 12:08:40 -0000 1.10 +++ openacs-4/packages/acs-subsite/www/members/member-invite.tcl 18 Aug 2015 12:34:36 -0000 1.10.6.1 @@ -62,8 +62,7 @@ -rel_type $rel_type } { form set_error user_search user_id "Error adding user to community: $errmsg" - global errorInfo - ns_log Error "Error adding user $user_id to community group $group_id: $errmsg\n$errorInfo" + ns_log Error "Error adding user $user_id to community group $group_id: $errmsg\n$::errorInfo" break } } Index: openacs-4/packages/acs-subsite/www/permissions/perm-modify.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/perm-modify.tcl,v diff -u -r1.4 -r1.4.2.1 --- openacs-4/packages/acs-subsite/www/permissions/perm-modify.tcl 27 Oct 2014 16:39:59 -0000 1.4 +++ openacs-4/packages/acs-subsite/www/permissions/perm-modify.tcl 18 Aug 2015 12:34:36 -0000 1.4.2.1 @@ -72,8 +72,7 @@ } } } on_error { - global errorInfo - ad_return_complaint 1 "Ooops, looks like we screwed up. Sorry. $errmsg

$errorInfo" + ad_return_complaint 1 "Ooops, looks like we screwed up. Sorry. $errmsg

$::errorInfo" } append page "" Index: openacs-4/packages/acs-subsite/www/register/user-join.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/user-join.tcl,v diff -u -r1.14 -r1.14.2.1 --- openacs-4/packages/acs-subsite/www/register/user-join.tcl 22 Jun 2015 21:03:13 -0000 1.14 +++ openacs-4/packages/acs-subsite/www/register/user-join.tcl 18 Aug 2015 12:34:36 -0000 1.14.2.1 @@ -170,8 +170,7 @@ -member_state $member_state } on_error { - global errorInfo - ns_log Error "user-join: Error when adding user to group: $errmsg\n$errorInfo" + ns_log Error "user-join: Error when adding user to group: $errmsg\n$::errorInfo" ad_return_error "Error Joining" "We experienced an error adding you to the group." ad_script_abort Index: openacs-4/packages/acs-subsite/www/shared/1pixel.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/1pixel.tcl,v diff -u -r1.6 -r1.6.2.1 --- openacs-4/packages/acs-subsite/www/shared/1pixel.tcl 27 Oct 2014 16:40:01 -0000 1.6 +++ openacs-4/packages/acs-subsite/www/shared/1pixel.tcl 18 Aug 2015 12:34:36 -0000 1.6.2.1 @@ -41,7 +41,6 @@ # Ignore simple i/o errors, which probably just mean that the user surfed on # to some other page before we finished serving if { ![string equal $errMsg {i/o failed}] } { - global errorInfo - ns_log Error "$errMsg\n$errorInfo" + ns_log Error "$errMsg\n$::errorInfo" } }