From 7940f14896b706a3f5afbd8655c82e05943f0962 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Mon, 8 Nov 2010 14:32:30 -0700 Subject: [PATCH] fix `draw-arc' Closes PR 11399 (Thanks Stephen!) --- collects/racket/draw/private/dc.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/racket/draw/private/dc.rkt b/collects/racket/draw/private/dc.rkt index 76c1d86a9a..9a33b84cd9 100644 --- a/collects/racket/draw/private/dc.rkt +++ b/collects/racket/draw/private/dc.rkt @@ -891,7 +891,7 @@ (def/public (draw-arc [real? x] [real? y] [nonnegative-real? width] [nonnegative-real? height] [real? start-radians] [real? end-radians]) - (do-draw-arc 'draw-arc x y width height 0 2pi)) + (do-draw-arc 'draw-arc x y width height start-radians end-radians)) (def/public (draw-ellipse [real? x] [real? y] [nonnegative-real? width] [nonnegative-real? height]) (do-draw-arc 'draw-ellipse x y width height 0 2pi))