Index: openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl,v
diff -u -r1.55.2.4 -r1.55.2.5
--- openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl	27 Nov 2015 10:26:58 -0000	1.55.2.4
+++ openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl	27 Nov 2015 23:08:07 -0000	1.55.2.5
@@ -60,7 +60,7 @@
      # number of mutex locks for the nsv ds_properties. Therefore,
      # cache its results in a per-thead variable.
      #
-     if {[info exists ::__ds_enabled_p]} {
+     if {[info exists ::ds_enabled_p]} {
          return $::ds_enabled_p
      }
      if { ![nsv_exists ds_properties enabled_p] || ![nsv_get ds_properties enabled_p] } {