@@ -352,11 +352,12 @@
 			    (< count 11)) ;; aprox 5-6 seconds
 		       (begin
 			 (thread-sleep! 1)
 			 (delay-loop (+ count 1))))
 		   (loop)))
-	     (debug:print-info 0 "Exiting watchdog timer, *time-to-exit* = " *time-to-exit*))))
+	     (if (common:low-noise-print 30)
+		 (debug:print-info 0 "Exiting watchdog timer, *time-to-exit* = " *time-to-exit*)))))
      "Watchdog thread")))
 
 (thread-start! *watchdog*)
 
 (if (args:get-arg "-log")