This commit is contained in:
Tommi Reiman 2022-02-14 16:58:10 +02:00
parent 45fbe5eaa2
commit 2aba5610c7
5 changed files with 8 additions and 8 deletions

View file

@ -11,7 +11,7 @@
[fipp.visit] [fipp.visit]
[reitit.exception :as exception] [reitit.exception :as exception]
[spell-spec.expound] ;; expound [spell-spec.expound] ;; expound
)) ))
;; ;;
;; colors ;; colors

View file

@ -3,9 +3,9 @@
[clojure.set :as set] [clojure.set :as set]
[clojure.walk :as walk] [clojure.walk :as walk]
[malli.core :as m] [malli.core :as m]
[malli.experimental.lite :as l]
[malli.edn :as edn] [malli.edn :as edn]
[malli.error :as me] [malli.error :as me]
[malli.experimental.lite :as l]
[malli.swagger :as swagger] [malli.swagger :as swagger]
[malli.transform :as mt] [malli.transform :as mt]
[malli.util :as mu] [malli.util :as mu]
@ -141,7 +141,7 @@
show? (fn [key] (contains? error-keys key)) show? (fn [key] (contains? error-keys key))
transformers (walk/prewalk #(if (satisfies? TransformationProvider %) (-transformer % opts) %) transformers) transformers (walk/prewalk #(if (satisfies? TransformationProvider %) (-transformer % opts) %) transformers)
compile (if lite (fn [schema options] (compile (binding [l/*options* options] (l/schema schema)) options)) compile (if lite (fn [schema options] (compile (binding [l/*options* options] (l/schema schema)) options))
compile)] compile)]
^{:type ::coercion/coercion} ^{:type ::coercion/coercion}
(reify coercion/Coercion (reify coercion/Coercion
(-get-name [_] :malli) (-get-name [_] :malli)

View file

@ -3,7 +3,7 @@
[clojure.string :as str] [clojure.string :as str]
[meta-merge.core :refer [meta-merge]] [meta-merge.core :refer [meta-merge]]
#?@(:clj [[ring.util.mime-type :as mime-type] #?@(:clj [[ring.util.mime-type :as mime-type]
[ring.util.response :as response]]) [ring.util.response :as response]])
[reitit.core :as r] [reitit.core :as r]
[reitit.exception :as ex] [reitit.exception :as ex]
[reitit.impl :as impl] [reitit.impl :as impl]

View file

@ -1,14 +1,14 @@
(ns reitit.coercion-test (ns reitit.coercion-test
(:require (:require
[clojure.test :refer [deftest is testing]] [clojure.test :refer [deftest is testing]]
[malli.experimental.lite :as l]
[reitit.coercion :as coercion] [reitit.coercion :as coercion]
[reitit.coercion.malli] [reitit.coercion.malli]
[reitit.coercion.schema] [reitit.coercion.schema]
[reitit.coercion.spec] [reitit.coercion.spec]
[reitit.core :as r] [reitit.core :as r]
[schema.core :as s] [schema.core :as s]
[spec-tools.data-spec :as ds] [spec-tools.data-spec :as ds])
[malli.experimental.lite :as l])
#?(:clj #?(:clj
(:import (:import
(clojure.lang ExceptionInfo)))) (clojure.lang ExceptionInfo))))

View file

@ -1,6 +1,7 @@
(ns reitit.ring-coercion-test (ns reitit.ring-coercion-test
(:require (:require
[clojure.test :refer [deftest is testing]] [clojure.test :refer [deftest is testing]]
[malli.experimental.lite :as l]
#?@(:clj [[muuntaja.middleware] #?@(:clj [[muuntaja.middleware]
[jsonista.core :as j]]) [jsonista.core :as j]])
[reitit.coercion.malli :as malli] [reitit.coercion.malli :as malli]
@ -10,8 +11,7 @@
[reitit.ring :as ring] [reitit.ring :as ring]
[reitit.ring.coercion :as rrc] [reitit.ring.coercion :as rrc]
[schema.core :as s] [schema.core :as s]
[spec-tools.data-spec :as ds] [spec-tools.data-spec :as ds])
[malli.experimental.lite :as l])
#?(:clj #?(:clj
(:import (:import
(clojure.lang ExceptionInfo) (clojure.lang ExceptionInfo)