status-im
/
status-mobile
mirror of https://github.com/status-im/status-mobile.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

fix #1118

This commit is contained in:
Roman Volosovskyi 2017-05-01 12:10:01 +03:00
parent 1d532fc820
commit 2f1271e6af
1 changed files with 10 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/status_im/components/permissions.cljs
View File

@ -1,5 +1,6 @@
(ns status-im.components.permissions
(:require [taoensso.timbre :as log]))
(:require [status-im.utils.platform :as platform]
[taoensso.timbre :as log]))
(def permissions-class (.-PermissionsAndroid js/ReactNative))
@ -16,9 +17,11 @@
(not= (first permission-vals) "denied"))))
(defn request-permissions [permissions then else]
(let [permissions (mapv #(get permissions-map %) permissions)
result (.requestMultiple permissions-class (clj->js permissions))
result (.then result #(if (all-granted? (js->clj %))
(then)
(when else (else))))
result (.catch result #(else))]))
(if platform/android?
(let [permissions (mapv #(get permissions-map %) permissions)
result (.requestMultiple permissions-class (clj->js permissions))
result (.then result #(if (all-granted? (js->clj %))
(then)
(when else (else))))
result (.catch result #(else))])
(then)))