From 9cbb3e7a5cf656b0e3041af2dce40b60ef6b120a Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Mon, 9 Jul 2018 09:54:52 -0600 Subject: [PATCH] another --- brag/private/indenter.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)]