From 3656cd1972660c80ab7fa795a32c9ed6829a0eb3 Mon Sep 17 00:00:00 2001 From: Matthias Felleisen Date: Fri, 2 Jul 2010 12:47:13 -0400 Subject: [PATCH] fixed pr 11010 --- collects/teachpack/2htdp/scribblings/universe.scrbl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/collects/teachpack/2htdp/scribblings/universe.scrbl b/collects/teachpack/2htdp/scribblings/universe.scrbl index 759b7b0301..ad90fd1cab 100644 --- a/collects/teachpack/2htdp/scribblings/universe.scrbl +++ b/collects/teachpack/2htdp/scribblings/universe.scrbl @@ -373,11 +373,11 @@ All @tech{MouseEvent}s are represented via strings: @defform[(on-mouse mouse-expr) #:contracts - ([clack-expr + ([mouse-expr (-> (unsyntax @tech{WorldState}) integer? integer? (unsyntax @tech{MouseEvent}) (unsyntax @tech{WorldState}))])]{ - tell DrRacket to call @scheme[clack-expr] on the current world, the current + tell DrRacket to call @scheme[mouse-expr] on the current world, the current @scheme[x] and @scheme[y] coordinates of the mouse, and and a @tech{MouseEvent} for every (noticeable) action of the mouse by the computer user. The result of the call becomes the current world. @@ -701,7 +701,7 @@ As mentioned, all event handlers may return @tech{WorldState}s or @defform/none[#:literals (on-mouse) (on-mouse mouse-expr) #:contracts - ([clack-expr + ([mouse-expr (-> (unsyntax @tech{WorldState}) integer? integer? (unsyntax @tech{MouseEvent}) (or/c (unsyntax @tech{WorldState}) package?))])]{