@@ -355,11 +355,11 @@
 		       (args:get-arg "-reqtarg")
 		       (if (args:get-arg "-target")
 			   (args:get-arg "-target")
 			   #f)))
 	   (sections (if target (list "default" target) #f))
-	   (data     (read-config "runconfigs.config" #f #f sections: sections)))
+	   (data     (read-config "runconfigs.config" #f #t sections: sections)))
 
       ;; keep this one local
       (cond
        ((not (args:get-arg "-dumpmode"))
 	(pp (hash-table->alist data)))
@@ -368,11 +368,11 @@
        (else
 	(debug:print 0 "ERROR: -dumpmode of " (args:get-arg "-dumpmode") " not recognised")))
       (set! *didsomething* #t)))
 
 (if (args:get-arg "-show-config")
-    (let ((data (read-config "megatest.config" #f #f)))
+    (let ((data (read-config "megatest.config" #f #t)))
       ;; keep this one local
       (cond 
        ((not (args:get-arg "-dumpmode"))
 	(pp (hash-table->alist data)))
        ((string=? (args:get-arg "-dumpmode") "json")