Index: common.scm
==================================================================
--- common.scm
+++ common.scm
@@ -1775,11 +1775,11 @@
   (let* ((cron-items     (map string->number (string-split cron-str)))
 	 (now-seconds    (or now-seconds-in (current-seconds)))
 	 (now-time       (seconds->local-time now-seconds))
 	 (last-done-time (seconds->local-time last-done))
 	 (all-times      (make-hash-table)))
-    (print "cron-items: " cron-items "(length cron-items): " (length cron-items))
+    ;; (print "cron-items: " cron-items "(length cron-items): " (length cron-items))
     (if (not (eq? (length cron-items) 5)) ;; don't even try to figure out junk strings
 	#f
 	(match-let (((     cmin chour cdayofmonth cmonth    cdayofweek)
 		     cron-items)
 		    ;; 0     1    2        3         4    5      6

Index: mtut.scm
==================================================================
--- mtut.scm
+++ mtut.scm
@@ -19,11 +19,11 @@
 
 (declare (uses common))
 (declare (uses megatest-version))
 (declare (uses margs))
 (declare (uses configf))
-(declare (uses rmt))
+;; (declare (uses rmt))
 
 (include "megatest-fossil-hash.scm")
 
 (let ((debugcontrolf (conc (get-environment-variable "HOME") "/.mtutilrc")))
   (if (file-exists? debugcontrolf)
@@ -289,11 +289,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.