summaryrefslogtreecommitdiff
path: root/src/player.fnl
diff options
context:
space:
mode:
Diffstat (limited to 'src/player.fnl')
-rw-r--r--src/player.fnl3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/player.fnl b/src/player.fnl
index 68d4f27..9ba457a 100644
--- a/src/player.fnl
+++ b/src/player.fnl
@@ -5,7 +5,6 @@
(set C.__index C)
(fn C.update [self dt ?world]
- (print ((. (require :vendor.fennel) :view) self))
(let [speed (if (love.keyboard.isScancodeDown :lshift :rshift)
SPRINT-SPEED SPEED)
up (if (love.keyboard.isScancodeDown :w :up) 1 0)
@@ -16,7 +15,7 @@
vx (- right left)
sf (math.sqrt (+ (* vx vx) (* vy vy)))
world (if ?world ?world
- {:move (fn move [_2 tx ty] (values tx ty))})]
+ {:move (fn move [_1 _2 tx ty] (values tx ty))})]
(when (not= sf 0)
(let [vx (/ vx sf)
vy (/ vy sf)