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 bb64d99..f6dc7c1 100644 --- a/starling/node-2d.scm +++ b/starling/node-2d.scm @@ -384,7 +384,8 @@ ;; If the parent is dirty, all the children need to be marked as ;; dirty, too. (for-each-child (lambda (child) - (set! (dirty-matrix? child) #t)) + (when (is-a? child <node-2d>) + (set! (dirty-matrix? child) #t))) node))) (next-method)) |