From 293860f8240273cb064e6a0ff946d56d34f352d6 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Wed, 15 Jan 2020 15:08:52 -0800 Subject: [PATCH] next: sizing discrepancy with tracking --- quad/quadwriter/layout.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/quad/quadwriter/layout.rkt b/quad/quadwriter/layout.rkt index f9821305..7524364a 100644 --- a/quad/quadwriter/layout.rkt +++ b/quad/quadwriter/layout.rkt @@ -148,7 +148,7 @@ (and (line-break-quad? q) q)) (define (do-string-quad q) - ;; need to handle casing here so that it's reflected in sizing ops + ;; need to handle casing here so that it's reflected in subsequent sizing ops (define cased-str ((match (quad-ref q :font-case) [(or "upper" "uppercase") string-upcase] [(or "lower" "lowercase" "down" "downcase") string-downcase]