aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/interactive-units/bitmap.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/interactive-units/bitmap.lisp')
-rw-r--r--src/interactive-units/bitmap.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/interactive-units/bitmap.lisp b/src/interactive-units/bitmap.lisp
index 95dfff5..cc4b4f7 100644
--- a/src/interactive-units/bitmap.lisp
+++ b/src/interactive-units/bitmap.lisp
@@ -2,7 +2,7 @@
(in-package #:wheelwork)
-(defclass/std bitmap (unit interactive)
+(defclass/std bitmap (affine interactive)
((texture :ri :std (error "A bitmap requires a texture."))
(vao shader :with :r :static)))
@@ -57,6 +57,7 @@
(gl:delete-program shader))
(setf vao nil
shader nil)))
+
(defmethod render ((bitmap bitmap))
(with-slots (texture vao shader) bitmap
(gl:active-texture 0)