diff --git a/gui-lib/framework/private/color.rkt b/gui-lib/framework/private/color.rkt index 7705d654..9d00aec6 100644 --- a/gui-lib/framework/private/color.rkt +++ b/gui-lib/framework/private/color.rkt @@ -1359,8 +1359,8 @@ added get-regions (define suggestions (list-ref err 2)) (set! answer (list* - (list #t (+ pos err-start) (+ pos err-start err-len)) - (list suggestions (+ pos lp) (+ pos err-start)) + (list suggestions (+ pos err-start) (+ pos err-start err-len)) + (list #f (+ pos lp) (+ pos err-start)) answer)) (loop (cdr spellos) (+ err-start err-len))])) (loop (cdr strs)