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.9 -r1.55.2.10
--- openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl	22 May 2016 19:22:11 -0000	1.55.2.9
+++ openacs-4/packages/acs-developer-support/tcl/acs-developer-support-procs.tcl	12 Jul 2016 18:34:47 -0000	1.55.2.10
@@ -411,7 +411,8 @@
      set kill_count 0
      foreach name $names {
          if { [regexp {^([0-9]+)\.} $name "" request]
-              && [expr {$request <= $max_request}] } {
+              && $request <= $max_request
+          } {
              incr kill_count
              nsv_unset ds_request $name
          }