diff --git a/collects/redex/private/traces.ss b/collects/redex/private/traces.ss
index 702d70a2ac..f2d67391c3 100644
--- a/collects/redex/private/traces.ss
+++ b/collects/redex/private/traces.ss
@@ -144,7 +144,7 @@
     (send ps-setup set-file filename)
     (send ps-setup set-mode 'file)
     (parameterize ([current-ps-setup ps-setup])
-      (send graph-pb print #t #f 'postscript #f #f #t))))
+      (send graph-pb print #f #f 'postscript #f #f #t))))
 
 (define (traces reductions pre-exprs 
                 #:multiple? [multiple? #f]