Index: runs.scm
==================================================================
--- runs.scm
+++ runs.scm
@@ -292,11 +292,11 @@
   (let ((sorted-test-names (tests:sort-by-priority-and-waiton test-records))
 	(item-patts        (hash-table-ref/default flags "-itempatt" #f))
 	(test-registery    (make-hash-table))
 	(num-retries        0)
 	(max-retries       (config-lookup *configdat* "setup" "maxretries")))
-    (if (and max-retries (string->number max-retries))(set! max-retries (string->number max-retries)) 100)
+    (set! max-retries (if (and max-retries (string->number max-retries))(string->number max-retries) 100))
     (if (not (null? sorted-test-names))
 	(let loop ((hed         (car sorted-test-names))
 		   (tal         (cdr sorted-test-names))
 		   (reruns      '()))
 	  (if (not (null? reruns))(debug:print 4 "INFO: reruns=" reruns))

Index: tests/fullrun/megatest.config
==================================================================
--- tests/fullrun/megatest.config
+++ tests/fullrun/megatest.config
@@ -15,11 +15,11 @@
 synchronous OFF
 # Throttle roughly scales the db access milliseconds to seconds delay
 throttle 0.02
 # Max retries allows megatest to re-check that a tests status has changed
 # as tests can have transient FAIL status occasionally
-maxretries 200
+# maxretries 200
 
 [validvalues]
 state start end 
 status pass fail n/a 0 1 running