diff --git a/brag/private/indenter.rkt b/brag/private/indenter.rkt index bec7b8c..abb37d6 100644 --- a/brag/private/indenter.rkt +++ b/brag/private/indenter.rkt @@ -27,6 +27,6 @@ (define end (send tbox line-end-position prev-line)) (for*/first ([pos (in-range start end)] [c (in-value (send tbox get-character pos))] - #:when (or (char=? c #\:) (char=? c #\|))) + #:when (memv c '(#\: #\|))) (- pos start))] [else #f])) \ No newline at end of file