From e287a11c4387382277c31735504fc762c33b4cee Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson@vistahigherlearning.com>
Date: Wed, 12 Oct 2022 06:48:14 -0400
Subject: Switch to Catbird engine.

---
 bonnie-bee/actor.scm | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'bonnie-bee/actor.scm')

diff --git a/bonnie-bee/actor.scm b/bonnie-bee/actor.scm
index 8aec98a..3d693dd 100644
--- a/bonnie-bee/actor.scm
+++ b/bonnie-bee/actor.scm
@@ -6,9 +6,10 @@
   #:use-module (chickadee math rect)
   #:use-module (chickadee math vector)
   #:use-module (oop goops)
-  #:use-module (starling asset)
-  #:use-module (starling node)
-  #:use-module (starling node-2d)
+  #:use-module (catbird asset)
+  #:use-module (catbird node)
+  #:use-module (catbird node-2d)
+  #:use-module (catbird scene)
   #:export (<actor>
             velocity
             hitbox
@@ -107,7 +108,7 @@
           (refresh-world-hitbox actor)
           (collision-check actor)
           (add-to-quadtree actor)
-          (dirty! actor)))))
+          (expire-local-matrix actor)))))
 
 (define-method (dead? (actor <actor>))
   #f)
@@ -138,7 +139,7 @@
 (define-method (damage (d <damageable>) x)
   (set! (health d) (max (- (health d) x) 0))
   (unless (dead? d)
-    (audio-play (asset-ref enemy-hit-sound) #:volume 0.25)))
+    (audio-play (artifact enemy-hit-sound) #:volume 0.25)))
 
 (define-method (on-death (d <damageable>))
   #t)
-- 
cgit v1.2.3