intrudoced sub directory for non-steam saves.
This commit is contained in:
@@ -83,8 +83,8 @@
|
||||
:let [n (.getFileNameAndSize rs i (make-array Integer/TYPE 1))]
|
||||
:when (.endsWith n ".edn")]
|
||||
n))
|
||||
(for [save-file (.list (files! :local ".") ".edn")]
|
||||
(.name save-file))))
|
||||
(for [save-file (.list (files! :local "saves/") ".edn")]
|
||||
(str "saves/" (.name save-file)))))
|
||||
|
||||
(defn save-screenshot [pm filename]
|
||||
(steamify
|
||||
@@ -106,3 +106,13 @@
|
||||
(steamify
|
||||
(.fileDelete (SteamRemoteStorage. nil) filename)
|
||||
(.delete (files! :local filename))))
|
||||
|
||||
(defn save-screenshot-file-name [name]
|
||||
(steamify
|
||||
(str "screenshot-" (clojure.core/name name) ".png" )
|
||||
(str "saves/screenshot-" (clojure.core/name name) ".png" )))
|
||||
|
||||
(defn save-file-name [id]
|
||||
(steamify
|
||||
(str id ".edn")
|
||||
(str "saves/" id ".edn")))
|
||||
|
||||
Reference in New Issue
Block a user