summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--chickadee/graphics/path.scm2
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)