Fix remove-clickback.

This commit is contained in:
Vincent St-Amour 2011-06-24 14:37:44 -04:00
parent 62ad7846b9
commit 5c77b19416

View File

@ -2368,7 +2368,7 @@
(set! clickbacks
(filter (lambda (cb)
(not (and (= start (clickback-start cb))
(= end (clickback-start cb)))))
(= end (clickback-end cb)))))
clickbacks)))
(def/public (call-clickback [exact-nonnegative-integer? start]