From 3a9e14051be04b64c0b412b76328c9c8f780398a Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 28 Jan 2011 06:22:28 -0700 Subject: [PATCH] DrRacket line numbers: fix condition for whether to draw a number original commit: 96fd11eedebc28331aa689892042742ea75039be --- collects/framework/private/text.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/collects/framework/private/text.rkt b/collects/framework/private/text.rkt index 9d01a911..bb9e6c94 100644 --- a/collects/framework/private/text.rkt +++ b/collects/framework/private/text.rkt @@ -3899,8 +3899,9 @@ designates the character that triggers autocompletion (define last-paragraph #f) (for ([line (in-range start-line end-line)]) (define y (line-location line)) + (define yb (line-location line #f)) - (when (<= top y bottom) + (when (and (y . <= . bottom) (yb . >= . top)) (define view (number->string (add1 (line-paragraph line)))) (define final-x (+ (left-space dc dx)