From e02a1af03770fbb470b4eefdbc628b2d2bab8d85 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sat, 11 Jan 2014 11:02:08 -0600 Subject: [PATCH] fix Same for Retina displays --- pkgs/games/same/same.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pkgs/games/same/same.rkt b/pkgs/games/same/same.rkt index 0d5934bc7a..5d977fe43f 100644 --- a/pkgs/games/same/same.rkt +++ b/pkgs/games/same/same.rkt @@ -74,7 +74,7 @@ (define same-canvas% (class canvas% - (inherit get-dc get-client-size) + (inherit get-dc get-client-size make-bitmap) (define/private (get-width) (let-values ([(w h) (get-client-size)]) w)) (define/private (get-height) (let-values ([(w h) (get-client-size)]) h)) (define/private (get-x-step) (/ (get-width) board-width))