@@ -1001,11 +1001,11 @@
 	      (mtconf    (car mtconfdat)))
 	 (common:load-pkts-to-db mtconf use-lt: #t) ;; need to NOT do this by default ...
 	 (common:with-queue-db
 	  mtconf
 	  (lambda (pktsdirs pktsdir conn)
-	    (make-report "out.dot" conn common:pkts-spec '(action ipaddr port) ))
+	    (make-report "out.dot" conn common:pkts-spec '(action ipaddr port filename) ))
 	  use-lt: #t)))
       ((db)
        (if (null? remargs)
 	   (print "ERROR: missing sub command for db command")
 	   (let ((subcmd (car remargs)))