fixes for resizing.

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)))

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))