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.67.2.57 -r1.67.2.58
--- openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl	10 Jul 2023 08:54:49 -0000	1.67.2.57
+++ openacs-4/packages/xotcl-request-monitor/tcl/throttle_mod-procs.tcl	15 Jul 2024 11:42:34 -0000	1.67.2.58
@@ -2007,11 +2007,12 @@
         if {$waiting >= $maxWaiting || $running >= $maxRunning} {
           set threadInfo [ns_server -server $s -pool $pool threads]
           lappend threadInfo waiting $waiting
+          set poolName [expr {$pool eq "" ? "default" : "'$pool'"}]
           set message ""
           append message \
-              "Server $s on [ad_system_name]: " \
+              "Server <strong>$s</strong> on [ad_system_name]: " \
               "more than $maxWaiting requests are waiting " \
-              "in connection pool '$pool' ($threadInfo)" \n \
+              "in connection pool $poolName ($threadInfo)" \n \
               "Currently running requests:" \n \
               "   " [join $reqs "\n   "] \n
         }