diff options
| -rw-r--r-- | starling/node-2d.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/starling/node-2d.scm b/starling/node-2d.scm index 205bf41..260f9b9 100644 --- a/starling/node-2d.scm +++ b/starling/node-2d.scm @@ -61,6 +61,7 @@ position rotation skew + dirty! pivot move-by move-to @@ -237,7 +238,7 @@ (world-matrix #:getter world-matrix #:init-form (make-identity-matrix4)) (dirty-matrix? #:accessor dirty-matrix? #:init-form #t)) -(define (dirty! node) +(define-method (dirty! (node <node-2d>)) (set! (dirty-matrix? node) #t)) (define-method (compute-matrices! (node <node-2d>)) |