From d154eefc35ce4001aa6d1a6c11e9261228dd0cdc Mon Sep 17 00:00:00 2001
From: Scott Ostler <scottbot9000@gmail.com>
Date: Wed, 16 Jun 2010 01:13:50 -0400
Subject: Update test scripts

---
 test/dumpfm/millstone.clj | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'test/dumpfm/millstone.clj')

diff --git a/test/dumpfm/millstone.clj b/test/dumpfm/millstone.clj
index e13ebe3..d972a88 100644
--- a/test/dumpfm/millstone.clj
+++ b/test/dumpfm/millstone.clj
@@ -51,6 +51,8 @@
 	result      {:path       path
 		     :ms         ms
 		     :error      (if (success? resp) nil [(:code resp) (:msg resp)])}]
+    (if (= (rand-int 100) 1)
+      (log (format "%s - %.02fms" path ms)))
     (dosync
      (commute *results* conj result))
     resp))
-- 
cgit v1.2.3-70-g09d2