fixed a bug found by randomized testing

svn: r17382
This commit is contained in:
Robby Findler 2009-12-21 20:59:18 +00:00
parent 345307ebbe
commit d3e8978b55

View File

@ -1808,10 +1808,10 @@ See also
@defmethod[(set-clickback [start exact-nonnegative-integer?] @defmethod[(set-clickback [start exact-nonnegative-integer?]
[end exact-nonnegative-integer?] [end exact-nonnegative-integer?]
[f ((is-a?/c text% [f (-> (is-a?/c text%)
exact-nonnegative-integer? exact-nonnegative-integer?
exact-nonnegative-integer?) exact-nonnegative-integer?
. -> . any)] any)]
[hilite-delta (or/c (is-a?/c style-delta%) #f) #f] [hilite-delta (or/c (is-a?/c style-delta%) #f) #f]
[call-on-down? any/c #f]) [call-on-down? any/c #f])
void?]{ void?]{