From 135b252062e86a3880bbf3e688fc87bdec989237 Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Sun, 28 May 2017 07:10:43 -0700 Subject: [PATCH] getting rid of issue where state preserved on screens. --- desktop/src-common/advent/screens/title.clj | 4 +--- desktop/src-common/advent/utils.clj | 1 + 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/desktop/src-common/advent/screens/title.clj b/desktop/src-common/advent/screens/title.clj index 7763f404..9eb23c03 100644 --- a/desktop/src-common/advent/screens/title.clj +++ b/desktop/src-common/advent/screens/title.clj @@ -367,10 +367,8 @@ (defscreen title-screen :on-show (fn [screen entities options] - (let [ - [screen global-atlas] (utils/acquire-atlas screen "packed/global.atlas") + (let [[screen global-atlas] (utils/acquire-atlas screen "packed/global.atlas") [screen title-atlas] (utils/acquire-atlas screen "packed/title.atlas") - _ (println (:resources screen)) screen (utils/setup-viewport screen 1280 960)] (log/info "Starting title screen.") diff --git a/desktop/src-common/advent/utils.clj b/desktop/src-common/advent/utils.clj index dc207a04..4b52a325 100644 --- a/desktop/src-common/advent/utils.clj +++ b/desktop/src-common/advent/utils.clj @@ -776,6 +776,7 @@ (defn release-resources [screen] (doseq [resource (:resources screen)] (asset-manager! *asset-manager* :unload resource)) + (update! screen :resources []) (app! :log "info"(str "Released resources " (.getDiagnostics *asset-manager*)))) (defn make-anim-seq