Don't return lazy seq and fix select-box

2014-04-20 18:52:00 -04:00
parent 694d63448c
commit 515ed8d3f7
2 changed files with 11 additions and 9 deletions
--- a/src/play_clj/core_graphics.clj
+++ b/src/play_clj/core_graphics.clj
@@ -191,8 +191,9 @@ non-tile layers, like object and image layers.
  "Returns a list with strings cooresponding to the name of each layer in the
 tiled map in `screen`."
  [screen]
-  (for [^MapLayer layer (map-layers screen)]
-    (.getName layer)))
+  (doall
+    (for [^MapLayer layer (map-layers screen)]
+      (.getName layer))))

 (defn map-objects*
  ([]