diff --git a/quad/qtest/all.rkt b/quad/qtest/all.rkt
index 1f650d7b..062359de 100644
--- a/quad/qtest/all.rkt
+++ b/quad/qtest/all.rkt
@@ -10,6 +10,6 @@
   (displayln (path->string name))
   (check-pdfs-equal? (time (parameterize ([quadwriter-test-mode #t]
                                           [current-output-port (open-output-nowhere)])
-                             (render-pdf (dynamic-require test-path 'doc) pdf-path test-path #:compress #false)
+                             (render-pdf (dynamic-require test-path 'doc) pdf-path test-path)
                              pdf-path))
                      (test-pdf-name test-path)))
\ No newline at end of file
diff --git a/quad/qtest/test-baseline-shift-tester.pdf b/quad/qtest/test-baseline-shift-tester.pdf
index ac11afe4..6efe42ce 100644
Binary files a/quad/qtest/test-baseline-shift-tester.pdf and b/quad/qtest/test-baseline-shift-tester.pdf differ
diff --git a/quad/qtest/test-docs-tester.pdf b/quad/qtest/test-docs-tester.pdf
index 041950ea..3840a96d 100644
Binary files a/quad/qtest/test-docs-tester.pdf and b/quad/qtest/test-docs-tester.pdf differ
diff --git a/quad/qtest/test-emoji-tester.pdf b/quad/qtest/test-emoji-tester.pdf
index 4edec0c2..57d55022 100644
Binary files a/quad/qtest/test-emoji-tester.pdf and b/quad/qtest/test-emoji-tester.pdf differ
diff --git a/quad/qtest/test-fallback-mini-tester.pdf b/quad/qtest/test-fallback-mini-tester.pdf
index 43904186..0520de80 100644
Binary files a/quad/qtest/test-fallback-mini-tester.pdf and b/quad/qtest/test-fallback-mini-tester.pdf differ
diff --git a/quad/qtest/test-fallback-super-tester.pdf b/quad/qtest/test-fallback-super-tester.pdf
index d9c03f9b..922229de 100644
Binary files a/quad/qtest/test-fallback-super-tester.pdf and b/quad/qtest/test-fallback-super-tester.pdf differ
diff --git a/quad/qtest/test-hello-tester.pdf b/quad/qtest/test-hello-tester.pdf
index 40c292f7..dbf30705 100644
Binary files a/quad/qtest/test-hello-tester.pdf and b/quad/qtest/test-hello-tester.pdf differ
diff --git a/quad/qtest/test-image-tester.pdf b/quad/qtest/test-image-tester.pdf
index c508465d..10ab3385 100644
Binary files a/quad/qtest/test-image-tester.pdf and b/quad/qtest/test-image-tester.pdf differ
diff --git a/quad/qtest/test-kafka-tester.pdf b/quad/qtest/test-kafka-tester.pdf
index 0c282e57..fe05924e 100644
Binary files a/quad/qtest/test-kafka-tester.pdf and b/quad/qtest/test-kafka-tester.pdf differ
diff --git a/quad/qtest/test-keep-with-next-tester.pdf b/quad/qtest/test-keep-with-next-tester.pdf
index 1a21222b..65b82f8a 100644
Binary files a/quad/qtest/test-keep-with-next-tester.pdf and b/quad/qtest/test-keep-with-next-tester.pdf differ
diff --git a/quad/qtest/test-ot-features-tester.pdf b/quad/qtest/test-ot-features-tester.pdf
index ff1a5f6c..a109a34f 100644
Binary files a/quad/qtest/test-ot-features-tester.pdf and b/quad/qtest/test-ot-features-tester.pdf differ
diff --git a/quad/qtest/test-sections-tester.pdf b/quad/qtest/test-sections-tester.pdf
index ba475c95..6e212a8f 100644
Binary files a/quad/qtest/test-sections-tester.pdf and b/quad/qtest/test-sections-tester.pdf differ
diff --git a/quad/qtest/test-symbol-tester.pdf b/quad/qtest/test-symbol-tester.pdf
index 3f77338d..9b9f2420 100644
Binary files a/quad/qtest/test-symbol-tester.pdf and b/quad/qtest/test-symbol-tester.pdf differ
diff --git a/quad/qtest/update-tests.rkt b/quad/qtest/update-tests.rkt
index 03b3d9ba..8cf2ab85 100644
--- a/quad/qtest/update-tests.rkt
+++ b/quad/qtest/update-tests.rkt
@@ -6,4 +6,4 @@
   (define-values (dir name _) (split-path test-path))
   (displayln (path->string name))
   (time (parameterize ([quadwriter-test-mode #t])
-          (render-pdf (dynamic-require test-path 'doc) (test-pdf-name test-path) test-path #:compress #false))))
\ No newline at end of file
+          (render-pdf (dynamic-require test-path 'doc) (test-pdf-name test-path) test-path))))
\ No newline at end of file
diff --git a/quad/quadwriter/layout.rkt b/quad/quadwriter/layout.rkt
index 31244b0f..c709f1ed 100644
--- a/quad/quadwriter/layout.rkt
+++ b/quad/quadwriter/layout.rkt
@@ -533,7 +533,7 @@
   (fill-color doc default-font-color)
   (text doc (format "~a · ~a at ~a" (quad-ref q :page-number 0)
                     (if (quadwriter-test-mode) "test" (quad-ref q :doc-title "untitled"))
-                    (date->string (if (quadwriter-test-mode) (seconds->date 0) (current-date)) #t))
+                    (date->string (if (quadwriter-test-mode) (seconds->date 0 #f) (current-date)) #t))
         x y))
 
 (define (make-footer-quad col-q page-idx path)