@@ -145,10 +145,11 @@
     ("-version"    . #f)
     ;; misc
     ("-repl"       . #f)
     ("-immediate"  . I)
     ("-preclean"   . r)
+    ("-rerun-all"  . u)
     ))
 
 ;; alist to map actions to old megatest commands
 (define *action-keys*
   '((run         . "-run")
@@ -511,11 +512,12 @@
 		    (if (not (or mode-patt tag-expr))
 			`(("-testpatt"  . "%"))
 			'())
 		    (if (or (not action)
 			    (equal? action "run"))
-			`(("-preclean"  . " "))      ;; if run we *always* want preclean set, use single space as placeholder
+			`(("-preclean"  . " ")
+			  ("-rerun-all" . " "))      ;; if run we *always* want preclean set, use single space as placeholder
 			'())
 		    )
 		   sched)))
       (with-output-to-file
 	  (conc pktsdir "/" uuid ".pkt")