greatbody
/
logseq
mirror of https://github.com/logseq/logseq
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

fix(mobile): capacitor v4 readdir api

pull/6791/head
Andelf 2022-09-19 01:37:51 +08:00
parent a183533947
commit 437b928fc4
1 changed files with 9 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/main/frontend/fs/capacitor_fs.cljs
View File

@ -82,36 +82,26 @@
(p/let [d (first dirs)
files (<readdir d)
files (->> files
(remove (fn [file]
(or (string/starts-with? file ".")
(and (mobile-util/native-android?)
(or (string/includes? file "#")
(string/includes? file "%")))
(= file "bak")))))
files (->> files
(map (fn [file]
;; TODO: use uri-join
(str (string/replace d #"/+$" "")
"/"
(if (mobile-util/native-ios?)
(js/encodeURI file)
file)))))
files-with-stats (p/all (mapv <stat files))
files-dir (->> files-with-stats
(remove (fn [{:keys [name type] :as file-info}]
(or (string/starts-with? name ".")
(and (= type "directory")
(or (= name "bak")
(= name "version-files")))))))
files-dir (->> files
(filterv #(= (:type %) "directory"))
(mapv :uri))
files-result
(p/all
(->> files-with-stats
(->> files
(filter #(= (:type %) "file"))
(filter
(fn [{:keys [uri]}]
(some #(string/ends-with? uri %)
[".md" ".markdown" ".org" ".edn" ".css"])))
(mapv
(fn [{:keys [uri] :as file-result}]
(fn [{:keys [uri] :as file-info}]
(p/chain (<read-file-with-utf8 uri)
#(assoc file-result :content %))))))]
#(assoc file-info :content %))))))]
(p/recur (concat result files-result)
(concat (rest dirs) files-dir)))))]
(js->clj result :keywordize-keys true)))