aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorcolin <colin@cicadas.surf>2023-08-05 11:11:04 -0700
committercolin <colin@cicadas.surf>2023-08-05 11:11:04 -0700
commitfcad653bc3e731ed96a18fd821ad48ddc440ed1b (patch)
tree19cb3699bae18408eea1cf0183845e37c8159d89
parente586c03cc218fd09553f3242b241c8d3b15bb05d (diff)
Bugfix; boneheaded
-rw-r--r--src/interactive/canvas.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interactive/canvas.lisp b/src/interactive/canvas.lisp
index 977e3ec..9a3515f 100644
--- a/src/interactive/canvas.lisp
+++ b/src/interactive/canvas.lisp
@@ -8,7 +8,7 @@
(defmethod initialize-instance :after ((pixels pixels) &key)
(with-slots (pixel-width pixel-height data) pixels
- (setf data (make-array (* pixel-height pixel-height 4)
+ (setf data (make-array (* pixel-width pixel-height 4)
:element-type 'unsigned-byte
:initial-element 255))))