@@ -20,44 +20,10 @@
 
 ;;======================================================================
 ;; Config file handling
 ;;======================================================================
 
-;; (use regex regex-case matchable) ;;  directory-utils)
-;; (declare (unit configf))
-;; (declare (uses process))
-;; (declare (uses env))
-;; (declare (uses keys))
-;; (declare (uses debugprint))
-;; (declare (uses mtargs))
-;; (declare (uses mtargs.import))
-;; (declare (uses common))
-;; (declare (uses commonmod))
-;; (declare (uses commonmod.import))
-;; (declare (uses processmod))
-;; (declare (uses processmod.import))
-;; (declare (uses configfmod))
-;; (declare (uses configfmod.import))
-;; (declare (uses dbfile))
-;; (declare (uses dbfile.import))
-;; (declare (uses dbmod))
-;; (declare (uses dbmod.import))
-;; (declare (uses mtmod))
-;; (declare (uses mtmod.import))
-;; (declare (uses megatestmod))
-;; (declare (uses megatestmod.import))
-;; 
-;; (import commonmod
-;; 	configfmod
-;; 	processmod
-;; 	(prefix mtargs args:)
-;; 	debugprint
-;; 	mtmod
-;; 	)
-;; 
-;; (include "common_records.scm")
-
 (define configf:imports "(import commonmod configfmod processmod (prefix mtargs args:))")
 
 
 (define (configf:process-line l ht allow-system #!key (linenum #f))
   (let loop ((res l))