bug fixes.

This commit is contained in:
Bryce Covert
2015-10-11 19:36:47 -07:00
parent b44f7ccdb3
commit 56f1d94269
2 changed files with 2 additions and 2 deletions

View File

@@ -112,7 +112,7 @@
{:run #(actions/respond entities % :game-player "Fine by me.")}]}) {:run #(actions/respond entities % :game-player "Fine by me.")}]})
(defn walk-to-player [entities] (defn walk-to-player [entities]
(actions/walk-to entities :ego [210 73] :face :right)) (actions/walk-to entities :ego [209 74] :face :right))
(defn brian-pause-from-work [entities] (defn brian-pause-from-work [entities]
(actions/play-animation entities :game-player :pause-from-work :stop? false) (actions/play-animation entities :game-player :pause-from-work :stop? false)

View File

@@ -428,7 +428,7 @@
(play-sound! screen entities snd volume-fn pan :once)) (play-sound! screen entities snd volume-fn pan :once))
([screen entities snd volume-fn pan type] ([screen entities snd volume-fn pan type]
(play-sound! screen entities snd volume-fn pan :once 1.0)) (play-sound! screen entities snd volume-fn pan type 1.0))
([screen entities snd volume-fn pan type pitch] ([screen entities snd volume-fn pan type pitch]
(let [vol (volume-fn entities) (let [vol (volume-fn entities)