Index: rmt.scm
==================================================================
--- rmt.scm
+++ rmt.scm
@@ -42,11 +42,11 @@
 			   (hash-table-set! *write-frequency* run-id v)
 			   v)))
 	     (count  (+ 1 (vector-ref record 1)))
 	     (start  (vector-ref record 0)))
 	(vector-set! record 1 count)
-	(if (and (> count 1) 
+	(if (and (> count 10) 
 		 (< (/ (- (current-seconds) start)
 		       count) ;; seconds per count
 		    10))
 	    (begin
 	      (debug:print-info 1 "db write rate too high, starting a server")