From c470b31cd19fdc96e9c068093d9ad53d158b2689 Mon Sep 17 00:00:00 2001 From: Gene Pasquet Date: Sun, 19 Apr 2026 13:20:03 +0100 Subject: Code cleanup --- animation.scm | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/animation.scm b/animation.scm index 2466cc8..f166bff 100644 --- a/animation.scm +++ b/animation.scm @@ -89,10 +89,7 @@ (define-pipeline (apply-animation animation) (scene entity dt) guard: (entity-ref entity #:animations #f) - (let* ((animations (entity-ref entity #:animations #f)) - (updated-entity (animate-entity entity animations dt))) - (when (eq? (entity-ref entity #:type) 'timed-frames) - (pp (list (entity-ref updated-entity #:tile-id) (entity-ref updated-entity #:duration) (entity-ref entity #:anim-tick)))) - updated-entity)) + (let ((animations (entity-ref entity #:animations #f))) + (animate-entity entity animations dt))) ) ;; End of animation module -- cgit v1.2.3