@@ -25,15 +25,19 @@
 (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))
 (import commonmod
-	(prefix mtargs args:))
+	(prefix mtargs args:)
+	debugprint)
 
 (include "common_records.scm")
 
 ;; return list (path fullpath configname)
 (define (find-config configname #!key (toppath #f))