diff --git a/quad/qtest/markdown.rkt b/quad/qtest/markdown.rkt index f33b8819..7e3a238a 100644 --- a/quad/qtest/markdown.rkt +++ b/quad/qtest/markdown.rkt @@ -322,11 +322,11 @@ (make-nobreak! ln)])) (cons ln reversed-lines))) -(define zoom-mode? #t) +(define zoom-mode? #f) (define zoom-scale 2) -(define top-margin 60) -(define bottom-margin 120) -(define side-margin 120) +(define top-margin (/ 60 (if zoom-mode? zoom-scale 1))) +(define bottom-margin (/ 120 (if zoom-mode? zoom-scale 1))) +(define side-margin (/ 120 (if zoom-mode? zoom-scale 1))) (define page-offset (pt (/ side-margin (if zoom-mode? 3 1)) (/ top-margin (if zoom-mode? 3 1)))) (require racket/date)