DrRacket line numbers: fix condition for whether to draw a number

original commit: 96fd11eedebc28331aa689892042742ea75039be
This commit is contained in:
Matthew Flatt 2011-01-28 06:22:28 -07:00
parent 8931482f2e
commit 3a9e14051b

View File

@ -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)