diff --git a/env/pacman.scm b/env/pacman.scm
index 997f071..3f0db17 100644
--- a/env/pacman.scm
+++ b/env/pacman.scm
@@ -290,9 +290,11 @@
 	       tower			;?
 	       (delay (let ((p (eval `(a-package ((for-syntax ,id)) ,@clauses)
 				     config)))
-			(ensure-loaded (make-structure p
-						       (lambda () (make-simple-interface #f '()))
-						       'for-syntax))
+			(really-ensure-loaded
+			  (and (not (batch-mode?)) (current-output-port))
+			  (make-structure p
+					  (lambda () (make-simple-interface #f '()))
+					  'for-syntax))
 			(cons eval p))))))
     config))