Index: openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl,v
diff -u -r1.49 -r1.50
--- openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl	25 Mar 2018 22:13:40 -0000	1.49
+++ openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl	29 Mar 2018 22:48:59 -0000	1.50
@@ -857,7 +857,7 @@
   }
 
   Users proc left_system {key pa now data reason} {
-    if {[dict exist $data start]} {
+    if {[dict exists $data start]} {
       set seconds [expr {$now - [dict get $data start]}]
       set clicks [dict get $data clicks]
     } else {
@@ -1035,7 +1035,7 @@
         set var user_in_community($key)
         if {[$class exists $var]} {
           set data [$class set $var]
-          if {[dict exist $data community_id]} {
+          if {[dict exists $data community_id]} {
             #
             # Logout from "community"
             #