|
|
@@ -139,15 +139,14 @@
|
|
|
[repo-dir file-path content]
|
|
|
(let [repo-dir (js/decodeURI repo-dir)
|
|
|
file-path (js/decodeURI file-path)
|
|
|
- backup-root (util/node-path.join repo-dir backup-dir)
|
|
|
+ backup-root (util/safe-path-join repo-dir backup-dir)
|
|
|
backup-dir-parent (util/node-path.dirname file-path)
|
|
|
backup-dir-parent (string/replace backup-dir-parent repo-dir "")
|
|
|
backup-dir-name (util/node-path.name file-path)
|
|
|
file-extname (util/node-path.extname file-path)
|
|
|
- new-path (util/node-path.join
|
|
|
+ new-path (util/safe-path-join
|
|
|
backup-root backup-dir-parent backup-dir-name
|
|
|
- (str (string/replace (.toISOString (js/Date.)) ":" "_") ".Mobile" file-extname))]
|
|
|
- (prn "====> Ready Backup mobile file::" repo-dir "++++" file-path "++++" new-path)
|
|
|
+ (str (string/replace (.toISOString (js/Date.)) ":" "_") "." (mobile-util/platform) file-extname))]
|
|
|
(.writeFile Filesystem (clj->js {:data content
|
|
|
:path (js/encodeURI new-path)
|
|
|
:encoding (.-UTF8 Encoding)
|