From ae1ca5b91a88e6241b58a3d73c9b5f24263d12e9 Mon Sep 17 00:00:00 2001 From: Michael W Date: Mon, 26 Dec 2011 01:20:15 -0700 Subject: [PATCH] Bugfix: text-outline now handles curves correctly --- collects/racket/draw/private/dc-path.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/racket/draw/private/dc-path.rkt b/collects/racket/draw/private/dc-path.rkt index b46510a008..4fff301aa8 100644 --- a/collects/racket/draw/private/dc-path.rkt +++ b/collects/racket/draw/private/dc-path.rkt @@ -290,8 +290,8 @@ [(move) (move-to (cadr a) (caddr a))] [(line) (line-to (cadr a) (caddr a))] [(curve) (curve-to (cadr a) (caddr a) - (list-ref a 2) (list-ref a 3) - (list-ref a 4) (list-ref a 5))] + (list-ref a 3) (list-ref a 4) + (list-ref a 5) (list-ref a 6))] [(close) (close)]))) (close))