update package and todo

.guix/modules/bloatrunner.scm

@@ -47,9 +47,9 @@
                                   (let* ((out    (assoc-ref outputs "out"))
                                          (guile  (assoc-ref inputs "guile"))
                                          (guile-opengl (assoc-ref inputs "guile-opengl"))
-                                         (guile-sdl22 (assoc-ref inputs "guile-sdl2"))
+                                         (guile-sdl2 (assoc-ref inputs "guile-sdl2"))
                                          (chickadee (assoc-ref inputs "guile-chickadee"))
-                                         (deps   (list out chickadee guile))
+                                         (deps   (list out guile-opengl guile-sdl2 chickadee guile))
                                          (effective (read-line
                                                      (open-pipe* OPEN_READ
                                                                  (string-append guile "/bin/guile")

README.org

@@ -36,7 +36,7 @@ let the _others_ fall in so you can pass over their head.
 So now, go out, collect the keys and maintain a healthy diet!
 
 
-* Game Plan [7/16]
+* Game Plan [9/16]
 
  - [X] start project organization
  - [X] select some assets to start with
@@ -45,11 +45,11 @@ So now, go out, collect the keys and maintain a healthy diet!
  - [X] create hero entity
  - [X] implement hero movement
  - [X] create other entity
- - [-] bundle game for distribution
+ - [X] bundle game for distribution
    - [X] add assets to the package
    - [X] wrap the script to find the libraries
-   - [ ] ensure the assets can be found by the render packages
+   - [X] ensure the assets can be found by the render packages
- - [ ] upload to itch.io
+ - [X] upload to itch.io
  - [ ] automate upload to itch.io
  - [ ] create other's AI
  - [ ] add keys and portal

game/model/level.scm

@@ -1,4 +1,5 @@
 (define-module (game model level)
+  #:use-module (game util assets)
   #:use-module (ice-9 match)
   #:use-module (ice-9 pretty-print)
   #:use-module (ice-9 textual-ports)
@@ -69,7 +70,7 @@
     (%make-level width height tiles #f #f entities)))
 
 (define (level-parse-file filename)
-  (level-parse (call-with-input-file filename get-string-all)))
+  (level-parse (call-with-input-file (asset-file-name filename) get-string-all)))
 
 
 (define (level-tile-at-row-col level row col )