@@ -65,11 +65,11 @@
 ;;                            from prior runs with same keys
 
 (define help (conc "
 Megatest, documentation at http://www.kiatoa.com/fossils/megatest
   version " megatest-version "
-  license GPL, Copyright Matt Welland 2006-2012
+  license GPL, Copyright Matt Welland 2006-2015
 
 Usage: megatest [options]
   -h                      : this help
   -version                : print megatest version (currently " megatest-version ")
 
@@ -282,11 +282,11 @@
 			"-get-run-status"
 
 			;; queries
 			"-test-paths" ;; get path(s) to a test, ordered by youngest first
 
-			"-runall"    ;; run all tests, respects -testpatt
+			"-runall"    ;; run all tests, respects -testpatt, defaults to %
 			"-run"       ;; alias for -runall
 			"-remove-runs"
 			"-rebuild-db"
 			"-cleanup-db"
 			"-rollup"
@@ -304,10 +304,17 @@
 			"-q" ;; quiet 0, errors/warnings only
 		       )
 		 args:arg-hash
 		 0))
 
+(if (and (not (null? remargs))
+	 (not (or
+	       (args:get-arg "-runstep"))
+	      ;; add more args that use remargs here
+	      ))
+    (debug:print 0 "ERROR: Unrecognised arguments: " (string-intersperse remargs " ")))
+
 ;; The watchdog is to keep an eye on things like db sync etc.
 ;;
 (define *time-zero* (current-seconds))
 (define *watchdog*
   (make-thread 
@@ -1138,11 +1145,12 @@
      "-runall"
      "run all tests"
      (lambda (target runname keys keyvals)
        (runs:run-tests target
 		       runname
-		       (args:get-arg "-testpatt")
+		       (or (args:get-arg "-testpatt")
+			   "%")
 		       user
 		       args:arg-hash))))
 
 ;;======================================================================
 ;; run one test