Index: db.scm
==================================================================
--- db.scm
+++ db.scm
@@ -182,11 +182,11 @@
 	  (db:set-sync db) ;; (sqlite3:execute db "PRAGMA synchronous = 0;")
 	  (if (not file-exists)(initproc db))
 	  ;; (release-dot-lock fname)
 	  db)
 	(begin
-	  (debug:print 0 "ERROR: no such db in non-writable dir " fname)
+	  (debug:print 2 "WARNING: opening db in non-writable dir " fname)
 	  (sqlite3:open-database fname))))) ;; )
 
 ;; This routine creates the db. It is only called if the db is not already opened
 ;; 
 (define (db:open-rundb dbstruct run-id #!key (attemptnum 0)(do-not-open #f)) ;;  (conc *toppath* "/megatest.db") (car *configinfo*)))

Index: megatest.scm
==================================================================
--- megatest.scm
+++ megatest.scm
@@ -127,11 +127,11 @@
   -show-runconfig         : dump the internal representation of the runconfigs.config file
   -dumpmode json          : dump in json format instead of sexpr
   -show-cmdinfo           : dump the command info for a test (run in test environment)
   -section sectionName
   -var varName            : for config and runconfig lookup value for sectionName varName
-  -since N   : get list of runs changed since time N (Unix seconds)
+  -since N                : get list of runs changed since time N (Unix seconds)
 
 Misc 
   -start-dir path         : switch to this directory before running megatest
   -rebuild-db             : bring the database schema up to date
   -cleanup-db             : remove any orphan records, vacuum the db
@@ -799,12 +799,12 @@
 	(debug:print 0 "ERROR: -dumpmode of " (args:get-arg "-dumpmode") " not recognised")))
       (set! *didsomething* #t)
       (pop-directory)))
 
 (if (args:get-arg "-show-cmdinfo")
-    (if (getenv "MT_CMDINFO")
-	(let ((data (common:read-encoded-string (getenv "MT_CMDINFO"))))
+    (if (or (args:get-arg ":value")(getenv "MT_CMDINFO"))
+	(let ((data (common:read-encoded-string (or (args:get-arg ":value")(getenv "MT_CMDINFO")))))
 	  (if (equal? (args:get-arg "-dumpmode") "json")
 	      (json-write data)
 	      (pp data))
 	  (set! *didsomething* #t))
 	(debug:print-info 0 "environment variable MT_CMDINFO is not set")))

Index: tests.scm
==================================================================
--- tests.scm
+++ tests.scm
@@ -139,11 +139,11 @@
 	 (testconfig  (tests:get-testconfig (db:test-get-testname testdat) test-registry #f))
 	 (test-rundir ;; (sdb:qry 'passstr 
 	  (db:test-get-rundir testdat)) ;; )
 	 (prev-rundir ;; (sdb:qry 'passstr 
 	  (db:test-get-rundir prev-testdat)) ;; )
-	 (waivers     (configf:section-vars testconfig "waivers"))
+	 (waivers     (if testconfig (configf:section-vars testconfig "waivers") '()))
 	 (waiver-rx   (regexp "^(\\S+)\\s+(.*)$"))
 	 (diff-rule   "diff %file1% %file2%")
 	 (logpro-rule "diff %file1% %file2% | logpro %waivername%.logpro %waivername%.html"))
     (if (not (file-exists? test-rundir))
 	(begin