making alpha work.

This commit is contained in:
2014-09-17 12:29:20 -07:00
parent 66eae07ca0
commit 1d413a12a8

View File

@@ -475,7 +475,9 @@ with the tiled map file at `path` and `unit` scale.
(let [^Batch batch (.getBatch renderer)] (let [^Batch batch (.getBatch renderer)]
(.begin batch) (.begin batch)
(doseq [entity entities] (doseq [entity entities]
(e/draw-entity! entity screen batch)) (.setColor batch (color 1 1 1 (or (:opacity entity) 1.0)))
(e/draw-entity! entity screen batch)
(.setColor batch (color 1 1 1 1)))
(.end batch)) (.end batch))
entities) entities)