summaryrefslogtreecommitdiff
path: root/game.fnl
diff options
context:
space:
mode:
Diffstat (limited to 'game.fnl')
-rw-r--r--game.fnl4
1 files changed, 3 insertions, 1 deletions
diff --git a/game.fnl b/game.fnl
index d95e3db..cbe3b57 100644
--- a/game.fnl
+++ b/game.fnl
@@ -166,13 +166,15 @@
(fn update [dt set-mode]
(: current-world :update dt)
+ (: current-player :update dt)
(let [(camera-x camera-y) (: current-camera :focus-on-object current-player dt)]
(tset current-camera :x-pos camera-x)
(tset current-camera :y-pos camera-y)))
(fn keypressed [key set-mode]
(let [method (if (= key "right") :move-right
- (= key "left") :move-left)]
+ (= key "left") :move-left
+ (= key "z") :jump)]
(when method
(: current-player method))))