diff options
-rw-r--r-- | chickadee/graphics/path.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/chickadee/graphics/path.scm b/chickadee/graphics/path.scm index 4978fbb..48e80d9 100644 --- a/chickadee/graphics/path.scm +++ b/chickadee/graphics/path.scm @@ -1450,7 +1450,7 @@ (let* ((r (painter-bounding-box painter)) (rx (rect-x r)) (ry (rect-y r)) - (rh (rect-width r))) + (rh (rect-height r))) (cons `(call ,(translate (vec2 (- rx) (- y ry)) painter)) (loop rest (+ y rh))))))) (let loop ((painters painters) |