wizard extended dialogue.

This commit is contained in:
2014-12-08 18:02:52 -08:00
parent 17121a0481
commit 9619742f35
2 changed files with 45 additions and 6 deletions

View File

@@ -203,7 +203,6 @@
(music! snd :play))
(defn stop-sound [snd]
(println "here")
(music! snd :stop))
(defn make-music [r]
@@ -278,8 +277,7 @@
(size! screen 320 240))
:on-hide (fn [screen [entities]]
(println (keys entities))
(doseq [snd (->> (doto (get-in entities [:musics]) println)
(doseq [snd (->> (get-in entities [:musics])
vals
(filter identity))]
(stop-sound snd)))