diff --git a/CHANGELOG.md b/CHANGELOG.md index f0c465bf..86874b5e 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -1,3 +1,9 @@ +## UNRELEASED + +## `reitit-core` + +* `spec-tools.data-spec/maybe` can be used in spec-coercion. + ## 0.1.2 (2018-6-6) ### `reitit-core` diff --git a/modules/reitit-spec/src/reitit/coercion/spec.cljc b/modules/reitit-spec/src/reitit/coercion/spec.cljc index d24f08c5..18025ae8 100644 --- a/modules/reitit-spec/src/reitit/coercion/spec.cljc +++ b/modules/reitit-spec/src/reitit/coercion/spec.cljc @@ -1,13 +1,14 @@ (ns reitit.coercion.spec (:require [clojure.spec.alpha :as s] [spec-tools.core :as st #?@(:cljs [:refer [Spec]])] - [spec-tools.data-spec :as ds] + [spec-tools.data-spec :as ds #?@(:cljs [:refer [Maybe]])] [spec-tools.transform :as stt] [spec-tools.swagger.core :as swagger] [reitit.coercion :as coercion] [clojure.set :as set]) #?(:clj - (:import (spec_tools.core Spec)))) + (:import (spec_tools.core Spec) + (spec_tools.data_spec Maybe)))) (def string-transformer (st/type-transformer @@ -48,6 +49,10 @@ (into-spec [this name] (ds/spec (ensure-name name) this)) + Maybe + (into-spec [this name] + (ds/spec (ensure-name name) this)) + Spec (into-spec [this _] this)