@@ -19,10 +19,11 @@
 
 (declare (uses common))
 (declare (uses megatest-version))
 (declare (uses margs))
 (declare (uses configf))
+(declare (uses dbmodule))
 
 (include "megatest-fossil-hash.scm")
 
 (let ((debugcontrolf (conc (get-environment-variable "HOME") "/.mtutilrc")))
   (if (file-exists? debugcontrolf)
@@ -283,11 +284,11 @@
 	 (mtconf    (if mtconfdat (car mtconfdat) #f)))
     ;; we set some dynamic data in a section called "dyndata"
     (if mtconf
 	(begin
 	  (configf:section-var-set! mtconf "dyndat" "toppath" start-dir)))
-    (print "TOPPATH: " (configf:lookup mtconf "dyndat" "toppath"))
+    ;; (print "TOPPATH: " (configf:lookup mtconf "dyndat" "toppath"))
     mtconfdat))
 
 
 ;; NEED TIMESTAMP ON PKTS for efficient loading of packets into db.