@@ -45,18 +45,21 @@
 (declare (uses dashboard-context-menu))
 (declare (uses vg))
 (declare (uses subrun))
 (declare (uses mt))
 (declare (uses dbfile))        
+(declare (uses debugprint))
 
 (include "common_records.scm")
 (include "db_records.scm")
 (include "run_records.scm")
-(include "task_records.scm")
+
 (include "megatest-version.scm")
 (include "megatest-fossil-hash.scm")
 (include "vg_records.scm")
+
+(import debugprint)
 
 (dbfile:db-init-proc db:initialize-main-db)
 
 (define help (conc 
 	      "Megatest Dashboard, documentation at http://www.kiatoa.com/fossils/megatest version " megatest-version