diff --git a/quad/quad/scribblings/quad.scrbl b/quad/quad/scribblings/quad.scrbl index 9ee322a5..4fca3657 100644 --- a/quad/quad/scribblings/quad.scrbl +++ b/quad/quad/scribblings/quad.scrbl @@ -663,7 +663,7 @@ Vertical offset of font baseline (positive values move the baseline up, negative } @defthing[#:kind "attribute" font-case symbol?]{ -Case transformation of string. Possibilities are @racket["upper"], @racket["lower"], or @racket["title"]. +Case transformation of string. Possibilities are @racket["uppercase"], @racket["lowercase"], or @racket["capitalize"] (= first letter of each word is uppercase, the rest is lowercase). } @deftogether[(@defthing[#:kind "attribute" line-height symbol?] diff --git a/quad/quadwriter/layout.rkt b/quad/quadwriter/layout.rkt index 354ff18e..f9821305 100644 --- a/quad/quadwriter/layout.rkt +++ b/quad/quadwriter/layout.rkt @@ -152,7 +152,7 @@ (define cased-str ((match (quad-ref q :font-case) [(or "upper" "uppercase") string-upcase] [(or "lower" "lowercase" "down" "downcase") string-downcase] - [(or "title" "titlecase") string-titlecase] + [(or "capitalize" "capitalized") string-titlecase] [_ values]) (unsafe-car (quad-elems q)))) (struct-copy string-quad q:string