workable autosave.
This commit is contained in:
@@ -68,7 +68,7 @@
|
|||||||
(defn snapshot-state [entities name]
|
(defn snapshot-state [entities name]
|
||||||
(doto (.getPreferences (Gdx/app) "ticks-tales-saves")
|
(doto (.getPreferences (Gdx/app) "ticks-tales-saves")
|
||||||
(.putString (saves/saves name) (pr-str (entities :state)))
|
(.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))
|
.flush))
|
||||||
|
|
||||||
(defn save [entities]
|
(defn save [entities]
|
||||||
|
|||||||
Reference in New Issue
Block a user