Index: rmt.scm
==================================================================
--- rmt.scm
+++ rmt.scm
@@ -104,11 +104,11 @@
     ;; check the load on dbfname and add some delay using a droop curve of sorts
     (if *journal-stats*
 	(let* ((load  (tt:get-journal-stats dbfname)))
 	  (if (> load 0.1) ;; start activating delay at 10% journal load time
 	      (let ((dely (* 50 (* load load)))) ;; 100% journal time=50sec delay
-		(debug:print 0 *default-log-port* "Journal load "load" delaying queries "dely"s.")
+		(debug:print 0 *default-log-port* "Journal load "load" on "dbfname" delaying queries "dely"s.")
 		(thread-sleep! dely)))))
 	
     (case (rmt:transport-mode)
       ((tcp)
        (let* ((start-time    (current-seconds)) ;; snapshot time so all use cases get same value