From 2d934e6a4fff547dd89206f8f5d372b1505d16a1 Mon Sep 17 00:00:00 2001 From: Matthias Felleisen Date: Fri, 12 Apr 2013 13:17:22 -0400 Subject: [PATCH] die to dice --- collects/realm/chapter10/source.rkt | 4 ++-- collects/realm/chapter12/source.rkt | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/collects/realm/chapter10/source.rkt b/collects/realm/chapter10/source.rkt index 9c77e0e67c..b64a57768f 100644 --- a/collects/realm/chapter10/source.rkt +++ b/collects/realm/chapter10/source.rkt @@ -596,9 +596,9 @@ (define first-die (get-dice-image 0)) (define height-die (image-height first-die)) (for/fold ([s first-die]) ([i (- n 1)]) - (define die-image (get-dice-image (+ i 1))) + (define dice-image (get-dice-image (+ i 1))) (define y-offset (* height-die (+ .5 (* i .25)))) - (overlay/offset s 0 y-offset die-image))) + (overlay/offset s 0 y-offset dice-image))) ;; Player -> Color ;; Determines a color for each player diff --git a/collects/realm/chapter12/source.rkt b/collects/realm/chapter12/source.rkt index cd46127e15..fc925e99fe 100644 --- a/collects/realm/chapter12/source.rkt +++ b/collects/realm/chapter12/source.rkt @@ -625,9 +625,9 @@ (define first-die (get-dice-image 0)) (define height-die (image-height first-die)) (for/fold ([s first-die]) ([i (- n 1)]) - (define die-image (get-dice-image (+ i 1))) + (define dice-image (get-dice-image (+ i 1))) (define y-offset (* height-die (+ .5 (* i .25)))) - (overlay/offset s 0 y-offset die-image))) + (overlay/offset s 0 y-offset dice-image))) ;; Player -> Color ;; Determines a color for each player