new cursors and tweaks for chapter save.
This commit is contained in:
Binary file not shown.
|
Before Width: | Height: | Size: 5.8 KiB After Width: | Height: | Size: 5.1 KiB |
@@ -83,7 +83,9 @@
|
|||||||
chapters (if (.contains prefs "chapters")
|
chapters (if (.contains prefs "chapters")
|
||||||
(edn/read-string (.getString prefs "chapters"))
|
(edn/read-string (.getString prefs "chapters"))
|
||||||
saves/chapters)
|
saves/chapters)
|
||||||
chapters (assoc chapters chapter {:state (entities :state)})]
|
chapters (assoc chapters chapter {:state (assoc (entities :state)
|
||||||
|
:x (get-in entities [:room :entities :ego :x])
|
||||||
|
:y (get-in entities [:room :entities :ego :y]))})]
|
||||||
(.putString prefs "chapters" (pr-str chapters))
|
(.putString prefs "chapters" (pr-str chapters))
|
||||||
(.flush prefs)))
|
(.flush prefs)))
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user