Fix map interceptors in cljs + add deps.edn (#19)

Close #18
exoscale · Jul 1, 2024 · afc0ff1 · afc0ff1
1 parent b208873
commit afc0ff1
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 3 deletions.
diff --git a/deps.edn b/deps.edn
@@ -0,0 +1,5 @@
+{:paths
+ ["src"]
+
+ :deps
+ {org.clojure/clojure {:mvn/version "1.11.1"}}}
diff --git a/src/exoscale/interceptor/impl.cljc b/src/exoscale/interceptor/impl.cljc
@@ -8,6 +8,10 @@
   #?(:clj clojure.lang.IPersistentMap
      :cljs cljs.core.PersistentHashMap)
   (interceptor [m] (map->Interceptor m))
+
+  #?@(:cljs
+      (cljs.core.PersistentArrayMap
+       (interceptor [m] (map->Interceptor m))))
 
   Interceptor
   (interceptor [r] r)
@@ -32,9 +36,9 @@
   (interceptor [x]
     ;; Fallback : Could already be ILookup'able, would cover custom types (ex:
     ;; records)
-    (when-not (instance? #?(:clj clojure.lang.ILookup
-                            :cljs cljs.core.ILookup)
-                         x)
+    (when-not
+      #?(:clj (instance? clojure.lang.ILookup x)
+         :cljs (satisfies? cljs.core.ILookup x))
       (throw (ex-info "Unsupported interceptor format/type"
                       {:exoscale.ex/type :exoscale.ex/invalid
                        :val x})))