fixup! set to 2.x

exoscale · Jan 25, 2024 · 5848b54 · 5848b54
1 parent 3689e7d
commit 5848b54
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 10 deletions.
diff --git a/src/exoscale/coax.cljc b/src/exoscale/coax.cljc
@@ -271,7 +271,7 @@
   indicates a spec form likely it will return it's generated coercer
   from registry :exoscale.coax/forms, otherwise it returns the
   identity coercer"
-  [spec {:as opts :exoscale.coax/keys [enums]}]
+  [spec {:as opts :keys [enums]}]
   (let [spec-exp (si/spec-root spec)
         {:as reg :exoscale.coax/keys [idents]} (-> @registry-ref
                                                    (update :exoscale.coax/idents

diff --git a/test/exoscale/coax_test.cljc b/test/exoscale/coax_test.cljc
@@ -1,4 +1,4 @@
-(ns exoscale.coax-test
+(ns coax-test
   #?(:cljs (:require-macros [cljs.test :refer [deftest testing is are]]
                             [exoscale.coax :as sc]))
   (:require
@@ -86,7 +86,7 @@
     (is (= (sc/coerce ::infer-nilable nil) nil))
     (is (= (sc/coerce ::infer-nilable "") ""))
     (is (= (sc/coerce ::nilable-int "10") 10))
-    (is (= (sc/coerce ::nilable-int "10" {::sc/idents {`int? (fn [x _] (keyword x))}}) :10))
+    (is (= (sc/coerce ::nilable-int "10" {:idents {`int? (fn [x _] (keyword x))}}) :10))
     (is (= (sc/coerce ::nilable-pos-int "10") 10))
 
     (is (= (sc/coerce ::nilable-string nil) nil))
@@ -287,7 +287,7 @@
                                ::not-defined "bla"
                                :unqualified 12
                                :sub {::infer-int "42"}}
-                              {::sc/idents {::not-defined `keyword?}})
+                              {:idents {::not-defined `keyword?}})
          {::some-coercion 321
           ::not-defined :bla
           :unqualified 12
@@ -344,22 +344,22 @@
                        ::legs ["7" "7"]
                        :foo "bar"
                        :name "john"}
-                      {::sc/idents
+                      {:idents
                        {::head c/to-long
                         ::leg c/to-long
                         ::name c/to-keyword}}))
         "Coerce with option form")
-    (is (= 1 (sc/coerce `string? "1" {::sc/idents {`string? c/to-long}}))
+    (is (= 1 (sc/coerce `string? "1" {:idents {`string? c/to-long}}))
         "overrides works on qualified-idents")
 
     (is (= [1] (sc/coerce `(s/coll-of string?) ["1"]
-                          {::sc/idents {`string? c/to-long}}))
+                          {:idents {`string? c/to-long}}))
         "overrides works on qualified-idents, also with composites")
 
     (is (= ["foo" "bar" "baz"]
            (sc/coerce `vector?
                       "foo,bar,baz"
-                      {::sc/idents {`vector? (fn [x _] (str/split x #"[,]"))}}))
+                      {:idents {`vector? (fn [x _] (str/split x #"[,]"))}}))
         "override on real world use case with vector?")))
 
 (s/def ::foo int?)
@@ -380,13 +380,13 @@
   (s/def ::test-closed-keys (s/keys :req [::bar ::foo]))
   (is (= (sc/coerce ::test-closed-keys {::foo 1 ::bar 2 ::zzz 3})
          {::foo 1 ::bar "2" ::zzz "3"}))
-  (is (= (sc/coerce ::test-closed-keys {::foo 1 ::bar 2 ::baz 3} {:exoscale.coax/closed true})
+  (is (= (sc/coerce ::test-closed-keys {::foo 1 ::bar 2 ::baz 3} {:closed true})
          {::foo 1 ::bar "2"}))
 
   (s/def ::test-closed-keys2 (s/keys :req-un [::bar ::foo]))
   (is (= (sc/coerce ::test-closed-keys2 {:foo 1 :bar 2 :zzz 3})
          {:foo 1 :bar "2" :zzz 3}))
-  (is (= (sc/coerce ::test-closed-keys2 {:foo 1 :bar 2 :baz 3} {:exoscale.coax/closed true})
+  (is (= (sc/coerce ::test-closed-keys2 {:foo 1 :bar 2 :baz 3} {:closed true})
          {:foo 1 :bar "2"})))
 
 (s/def ::tuple (s/tuple ::foo ::bar int?))