From 79030d57e9bd7986559dc00b97f4b5f59c7846b6 Mon Sep 17 00:00:00 2001
From: Peter Tillemans <pti@snamellit.com>
Date: Tue, 21 May 2024 13:56:18 +0200
Subject: [PATCH] update makefile with additional sources

---
 Makefile.am          | 7 ++++++-
 game/render/hero.scm | 4 ++--
 2 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/Makefile.am b/Makefile.am
index 024fc0e..7f1e31e 100644
--- a/Makefile.am
+++ b/Makefile.am
@@ -20,7 +20,12 @@ moddir=$(prefix)/share/guile/site/$(GUILE_EFFECTIVE_VERSION)
 godir=$(libdir)/guile/$(GUILE_EFFECTIVE_VERSION)/site-ccache
 
 SOURCES = 					\
-  game/main.scm
+  game/model/level.scm \
+  game/model/hero.scm \
+  game/render/level.scm \
+  game/render/hero.scm \
+  game/main.scm 
+
 
 EXTRA_DIST = 					\
   $(SOURCES)					\
diff --git a/game/render/hero.scm b/game/render/hero.scm
index c08f56c..f6670db 100644
--- a/game/render/hero.scm
+++ b/game/render/hero.scm
@@ -21,8 +21,8 @@
 
 (define (hero-sprite hero)
   (let* ((x (inexact->exact (floor (vec2-x (hero-position hero)))))
-         (x-offset (remainder x 8))
-         (hero-index (+ hero-walk-offset x-offset)))
+         (animation-frame (remainder x 8))
+         (hero-index (+ hero-walk-offset animation-frame)))
     (texture-atlas-ref hero-atlas hero-index)))
 
 (define (render-hero hero)