Only allow string paths when loading assets

2014-09-26 23:26:38 -04:00
parent 647fa9f7a2
commit f10639ed99
4 changed files with 12 additions and 25 deletions
--- a/src/play_clj/core_graphics.clj
+++ b/src/play_clj/core_graphics.clj
@@ -2,11 +2,8 @@

 (defn pixmap*
  [path]
-  (let [^FileHandle fh (if (string? path)
-                         (files! :internal path)
-                         path)]
-    (or (u/load-asset (.path fh) Pixmap)
-        (Pixmap. fh))))
+  (or (u/load-asset path Pixmap)
+      (Pixmap. (files! :internal path))))

 (defmacro pixmap
  "Returns a [Pixmap](http://libgdx.badlogicgames.com/nightlies/docs/api/com/badlogic/gdx/graphics/Pixmap.html).