@@ -23,15 +23,15 @@
 (require-library iup)
 (import (prefix iup iup:))
 
 (use canvas-draw)
 (import canvas-draw-iup)
-(use ducttape-lib)
+;; (use ducttape-lib)
 (use sqlite3 srfi-1 posix regex regex-case srfi-69 typed-records
      sparse-vectors srfi-18
-     (prefix mtconfigf configf:)
-     (prefix margs args:))
+     #;(prefix mtconfigf configf:)
+     ) 
 (import (prefix sqlite3 sqlite3:))
 
 ;; (declare (uses common))
 ;; (declare (uses margs))
 ;; (declare (uses keys))
@@ -65,10 +65,17 @@
 (declare (uses testsmod))
 (import testsmod)
 
 (declare (uses dcommonmod))
 (import dcommonmod)
+(declare (uses mtargs))
+(import (prefix mtargs args:))
+(declare (uses ducttape-lib))
+(import ducttape-lib)
+(declare (uses mtconfigf))
+(import (prefix mtconfigf configf:))
+
 
 (include "common_records.scm")
 (include "db_records.scm")
 (include "run_records.scm")
 (include "task_records.scm")
@@ -80,10 +87,13 @@
 (declare (uses testsmod.import))
 (declare (uses rmtmod.import))
 (declare (uses runsmod.import))
 (declare (uses megamod.import))
 (declare (uses dcommonmod.import))
+(declare (uses mtargs.import))
+(declare (uses ducttape-lib.import))
+(declare (uses mtconfigf.import))
 
 (configf:set-debug-printers debug:print debug:print-info debug:print-error *default-log-port*)
 (configf:add-eval-string "(import megamod)(import commonmod)")