17 lines
458 B
Clojure
17 lines
458 B
Clojure
(ns status-im.utils.fs
|
|
(:require [clojure.string :as s]
|
|
[status-im.utils.utils :as u]))
|
|
|
|
(def fs (js/require "react-native-fs"))
|
|
|
|
(defn move-file [src dst handler]
|
|
(let [result (.moveFile fs src dst)
|
|
result (.then result #(handler nil %))
|
|
result (.catch result #(handler % nil))]
|
|
result))
|
|
|
|
(defn read-file [path encoding on-read on-error]
|
|
(-> (.readFile fs path encoding)
|
|
(.then on-read)
|
|
(.catch on-error)))
|