diff --git a/src/play_clj/core_graphics.clj b/src/play_clj/core_graphics.clj index c30feb9..1ff0a5b 100644 --- a/src/play_clj/core_graphics.clj +++ b/src/play_clj/core_graphics.clj @@ -486,8 +486,9 @@ with the tiled map file at `path` and `unit` scale. entities) (defmethod draw! Stage - [{:keys [^Stage renderer] :as screen} entities] + [{:keys [^Stage renderer ^Camera camera] :as screen} entities] (let [^Batch batch (.getBatch renderer)] + (.setProjectionMatrix batch (.combined camera)) (.begin batch) (doseq [entity entities] (.setColor batch (color 1 1 1 (or (:opacity entity) 1.0))) diff --git a/src/play_clj/core_listeners.clj b/src/play_clj/core_listeners.clj index 321509b..13123e3 100644 --- a/src/play_clj/core_listeners.clj +++ b/src/play_clj/core_listeners.clj @@ -186,11 +186,10 @@ in the `screen`." (defn ^:private update-stage! ([{:keys [^Stage renderer ^Camera camera] :as screen}] - (when camera + #_(when camera (doto (.getViewport renderer) (.setCamera camera) - (.setWorldSize (. camera viewportWidth) (. camera viewportHeight)) - (.update (game :width) (game :height) true)))) + (.setWorldSize (. camera viewportWidth) (. camera viewportHeight))))) ([{:keys [^Stage renderer ui-listeners]} entities] (doseq [^Actor a (.getActors renderer)] (.remove a))