fixed Download latest button for Mac

Signed-off-by: Andrey Shovkoplyas <motor4ik@gmail.com>

src/status_im/ui/components/desktop/events.cljs

@@ -22,7 +22,7 @@
              (= tab-name :profile))
     {:http-get
      {:url
-      "https://raw.githubusercontent.com/status-im/status-im.github.io/develop/env.sh"
+      "https://status-im.ams3.digitaloceanspaces.com/latest.json"
       :success-event-creator
       (fn [o]
         [:fetch-desktop-version-success o])}}))

src/status_im/ui/screens/events.cljs

@@ -35,7 +35,8 @@
             [status-im.utils.fx :as fx]
             [status-im.utils.platform :as platform]
             [taoensso.timbre :as log]
-            [clojure.string :as str]))
+            [clojure.string :as str]
+            [status-im.utils.types :as types]))
 
 (defn- http-get [{:keys [url response-validator success-event-creator failure-event-creator timeout-ms]}]
   (let [on-success #(re-frame/dispatch (success-event-creator %))
@@ -163,11 +164,7 @@
  :fetch-desktop-version-success
  (fn [{:keys [db]} [_ result]]
    (when (and result (not (str/blank? result)) (or platform/isMacOs? platform/isNix?))
-     (let [lines (str/split-lines result)
-           var   (if platform/isMacOs? "DMG_URL=\"" "NIX_URL=\"")
-           param (first (filter #(not= -1 (.indexOf % var)) lines))]
-       (when param
-         (let [url    (subs param (+ 9 (.indexOf param var)) (- (count param) 1))
-               dt     (- (count url) (if platform/isMacOs? 12 17))
+     (when-let [url (get (types/json->clj result) (if platform/isMacOs? :MAC :APP))]
+       (let [dt     (- (count url) (if platform/isMacOs? 12 17))
              commit (subs url (- dt 6) dt)]
-           {:db (assoc-in db [:desktop/desktop :nightly-version] {:url url :commit commit})}))))))
+         {:db (assoc-in db [:desktop/desktop :nightly-version] {:url url :commit commit})})))))

src/status_im/utils/platform.cljs

@@ -23,6 +23,7 @@
 
 (def isMacOs? (when platform (.-isMacOs platform)))
 (def isNix? (when platform (or (.-isLinux platform) (.-isUnix platform))))
+(def isWin? (when platform (.-isWin platform)))
 
 (def platform-specific
   (cond