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.39 -r1.40
--- openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl	17 Apr 2012 15:23:16 -0000	1.39
+++ openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl	17 Apr 2012 18:05:46 -0000	1.40
@@ -1163,8 +1163,9 @@
   #my log "+++ [self proc] [ad_conn url] auth ms [my ms] [ad_conn isconnected]"
   set r [my check]
   if {$r<0} {
+      set url [my set url]
     ns_return 200 text/html "
-      <H1>[_ xotcl-request-monitor.repeated_operation [list url [my set url]]]</H1>
+      <H1>[_ xotcl-request-monitor.repeated_operation]</H1>
       [_ xotcl-request-monitor.operation_blocked]<p>"
     return filter_return
   } elseif {$r>0} {