Bugfix: text-outline now handles curves correctly

This commit is contained in:
Michael W 2011-12-26 01:20:15 -07:00 committed by Matthew Flatt
parent e12bf33f8d
commit ae1ca5b91a

View File

@ -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))