wizard extended dialogue.
This commit is contained in:
@@ -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)))
|
||||
|
||||
Reference in New Issue
Block a user