workable autosave.

This commit is contained in:
Bryce Covert
2015-10-05 21:24:53 -07:00
parent 6ff5f58c12
commit 0409fba8ca

View File

@@ -68,7 +68,7 @@
(defn snapshot-state [entities name]
(doto (.getPreferences (Gdx/app) "ticks-tales-saves")
(.putString (saves/saves name) (pr-str (entities :state)))
(.putString "snapshot-list" (pr-str (cons (saves/saves name) (filter (complement #{(saves/saves name)}) (snapshot-list)))))
(.putString "snapshot-list" (pr-str (filter (complement #{"Autosave"} ) (cons (saves/saves name) (snapshot-list)))))
.flush))
(defn save [entities]