Fix cljs compilation

nenadalm · Feb 9, 2020 · c79d0a8 · c79d0a8
1 parent fff9596
commit c79d0a8
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/src/re_graph/internals.cljc b/src/re_graph/internals.cljc
@@ -4,8 +4,9 @@
             [re-frame.std-interceptors :as rfi]
             [re-frame.interop :refer [empty-queue]]
             [re-graph.logging :as log]
-            #?(:cljs [cljs-http.client :as http]
-               :clj  [clj-http.client :as http])
+            #?@(:cljs [[cljs-http.client :as http]
+                       [cljs-http.core :as http-core]]
+                :clj  [[clj-http.client :as http]])
             #?(:cljs [clojure.core.async :as a]
                :clj  [clojure.core.async :refer [go] :as a])
             #?(:clj [gniazdo.core :as ws])
@@ -124,7 +125,7 @@
  ::send-http
  (fn [[instance-name query-id http-url {:keys [request payload]}]]
    #?(:cljs (let [response-chan (http/post http-url (assoc request :json-params payload))]
-              (re-frame/dispatch [::register-abort instance-name query-id #(http/abort response-chan)])
+              (re-frame/dispatch [::register-abort instance-name query-id #(http-core/abort! response-chan)])
 
               (go (let [{:keys [status body error-code]} (a/<! response-chan)]
                     (re-frame/dispatch [::http-complete