Changed on-draw to to-draw in Racket source files