diff --git a/brag/private/indenter.rkt b/brag/private/indenter.rkt index abb37d6..392ea4f 100644 --- a/brag/private/indenter.rkt +++ b/brag/private/indenter.rkt @@ -22,7 +22,7 @@ (define this-line (line tbox posn)) (cond [(not prev-line) #f] - [(char=? (line-first-visible-char tbox this-line) #\|) + [(eqv? (line-first-visible-char tbox this-line) #\|) (define start (send tbox line-start-position prev-line)) (define end (send tbox line-end-position prev-line)) (for*/first ([pos (in-range start end)]