@@ -19,13 +19,28 @@
 (declare (unit diff-report))
 ;; (declare (uses common))
 (declare (uses debugprint))
 (declare (uses rmtmod))
 (declare (uses commonmod))
-(import commonmod
+(declare (uses stml2))
+
+(module diff-report
+	*
+(import scheme
+	chicken
+	posix
+	debugprint
+	ports
+	srfi-1
+	srfi-13
+	srfi-69
+	data-structures
+
+	stml2
+	commonmod
 	rmtmod
-	debugprint)
+	)
          
 ;; (include "common_records.scm")
 (use matchable)
 (use fmt)
 (use ducttape-lib)
@@ -414,5 +429,6 @@
       #f)
      (else
       (diff:deliver-diff-report src-run-id dest-run-id email-recipients-list: to-list html-output-file: html-file)))))
 
   
+)