Index: openacs-4/packages/xotcl-request-monitor/tcl/callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/tcl/callback-procs.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/xotcl-request-monitor/tcl/callback-procs.tcl	17 Sep 2007 10:15:52 -0000	1.1
+++ openacs-4/packages/xotcl-request-monitor/tcl/callback-procs.tcl	17 Sep 2007 10:25:51 -0000	1.2
@@ -32,15 +32,17 @@
 	
 	if {$parameter eq "trend-elements"} {
 	    set slot_name "nr_trend_elements"
-	} elsif {$parameter eq "max-stats-elements"} {
+	} elseif {$parameter eq "max-stats-elements"} {
 	    set slot_name "nr_stats_elements"
 	} else {
-	    return
+	    set slot_name ""
 	}
 
-	throttle do eval {
-	    ::Counter set $slot_name $value
-	    foreach object [Counter allinstances] {$object set $slot_name $value}
+	if {$slot_name ne ""} {
+	    throttle do eval {
+		::Counter set $slot_name $value
+		foreach object [Counter allinstances] {$object set $slot_name $value}
+	    }
 	}
     }
 }