Fix game images alist
This commit is contained in:
parent
7888601c1e
commit
4fcc130c9c
10
game.scm
10
game.scm
|
@ -56,11 +56,11 @@
|
|||
(define game-width 640.0)
|
||||
(define game-height 480.0)
|
||||
|
||||
(define game-images `(('player . ,(make-image "assets/sprites/player.png"))
|
||||
('barrel . ,(make-image "assets/sprites/barrel.png"))
|
||||
('bricks . ,(make-image "assets/sprites/bricks.png"))
|
||||
('stones . ,(make-image "assets/sprites/stones.png"))
|
||||
('card-back . ,(make-image "assets/sprites/bricks.png"))))
|
||||
(define game-images `((player . ,(make-image "assets/sprites/player.png"))
|
||||
(barrel . ,(make-image "assets/sprites/barrel.png"))
|
||||
(bricks . ,(make-image "assets/sprites/bricks.png"))
|
||||
(stones . ,(make-image "assets/sprites/stones.png"))
|
||||
(card-back . ,(make-image "assets/sprites/bricks.png"))))
|
||||
|
||||
(parameterize ((*logger* pk))
|
||||
(parameterize ((*media-library* (create-media-library)))
|
||||
|
|
Loading…
Reference in a new issue