luciano/reitit
1
0
Fork 0
mirror of https://github.com/metosin/reitit.git synced 2025-12-16 16:01:11 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

format-ns

Browse source
This commit is contained in:
Tommi Reiman 2022-02-14 16:59:20 +02:00
parent 2aba5610c7
commit f3dee769fb
62 changed files with 325 additions and 411 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
.lsp/config.edn
View file

@ -1,2 +1,3 @@
{:cljfmt {:indents {for-all [[:inner 0]]
are [[:inner 0]]}}}
are [[:inner 0]]}}
:clean {:ns-inner-blocks-indentation :same-line}}

6
modules/reitit-core/src/reitit/coercion.cljc
View file

@ -1,10 +1,8 @@
(ns reitit.coercion
(:require
[clojure.walk :as walk]
(:require [clojure.walk :as walk]
[reitit.impl :as impl])
#?(:clj
(:import
(java.io Writer))))
(:import (java.io Writer))))
;;
;; Protocol

3
modules/reitit-core/src/reitit/core.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.core
(:require
[reitit.exception :as exception]
(:require [reitit.exception :as exception]
[reitit.impl :as impl]
[reitit.trie :as trie]))

3
modules/reitit-core/src/reitit/dependency.cljc
View file

@ -1,7 +1,6 @@
(ns reitit.dependency
"Dependency resolution for middleware/interceptors."
(:require
[reitit.exception :as exception]))
(:require [reitit.exception :as exception]))
(defn- providers
"Map from provision key to provider. `get-provides` should return the provision keys of a dependent."

3
modules/reitit-core/src/reitit/exception.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.exception
(:require
[clojure.string :as str]))
(:require [clojure.string :as str]))
(defn fail!
([type]

6
modules/reitit-core/src/reitit/impl.cljc
View file

@ -1,14 +1,12 @@
(ns ^:no-doc reitit.impl
#?(:cljs (:require-macros [reitit.impl]))
(:require
[clojure.set :as set]
(:require [clojure.set :as set]
[clojure.string :as str]
[meta-merge.core :as mm]
[reitit.exception :as ex]
[reitit.trie :as trie])
#?(:clj
(:import
(java.net URLEncoder URLDecoder)
(:import (java.net URLEncoder URLDecoder)
(java.util HashMap Map))))
(defn parse [path opts]

3
modules/reitit-core/src/reitit/interceptor.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.interceptor
(:require
[clojure.pprint :as pprint]
(:require [clojure.pprint :as pprint]
[meta-merge.core :refer [meta-merge]]
[reitit.core :as r]
[reitit.exception :as exception]

3
modules/reitit-core/src/reitit/middleware.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.middleware
(:require
[clojure.pprint :as pprint]
(:require [clojure.pprint :as pprint]
[meta-merge.core :refer [meta-merge]]
[reitit.core :as r]
[reitit.exception :as exception]

3
modules/reitit-core/src/reitit/spec.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.spec
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[clojure.spec.gen.alpha :as gen]
[reitit.core :as r]
[reitit.exception :as exception]))

6
modules/reitit-core/src/reitit/trie.cljc
View file

@ -1,10 +1,8 @@
(ns reitit.trie
(:refer-clojure :exclude [compile])
(:require
[clojure.string :as str]
(:require [clojure.string :as str]
[reitit.exception :as ex])
#?(:clj (:import
(java.net URLDecoder)
#?(:clj (:import (java.net URLDecoder)
[reitit Trie Trie$Match Trie$Matcher])))
(defn ^:no-doc into-set [x]

3
modules/reitit-dev/src/reitit/dev/pretty.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.dev.pretty
(:require
[arrangement.core] ;; spell-spec
(:require [arrangement.core] ;; spell-spec
[clojure.spec.alpha :as s]
[clojure.string :as str]
[expound.alpha] ;; fipp

6
modules/reitit-frontend/src/reitit/frontend.cljs
View file

@ -1,10 +1,8 @@
(ns reitit.frontend
(:require
[clojure.set :as set]
(:require [clojure.set :as set]
[reitit.coercion :as coercion]
[reitit.core :as r])
(:import
goog.Uri
(:import goog.Uri
goog.Uri.QueryData))
(defn- query-param [^QueryData q k]

3
modules/reitit-frontend/src/reitit/frontend/easy.cljs
View file

@ -2,8 +2,7 @@
"Easy wrapper over reitit.frontend.history,
handling the state. Only one router can be active
at a time."
(:require
[reitit.frontend.history :as rfh]))
(:require [reitit.frontend.history :as rfh]))
(defonce history (atom nil))

6
modules/reitit-frontend/src/reitit/frontend/history.cljs
View file

@ -1,12 +1,10 @@
(ns reitit.frontend.history
"Provides integration to hash-change or HTML5 History
events."
(:require
[goog.events :as gevents]
(:require [goog.events :as gevents]
[reitit.core :as reitit]
[reitit.frontend :as rf])
(:import
goog.Uri))
(:import goog.Uri))
(defprotocol History
(-init [this] "Create event listeners")

3
modules/reitit-http/src/reitit/http.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.http
(:require
[meta-merge.core :refer [meta-merge]]
(:require [meta-merge.core :refer [meta-merge]]
[reitit.core :as r]
[reitit.exception :as ex]
[reitit.interceptor :as interceptor]

3
modules/reitit-http/src/reitit/http/coercion.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.http.coercion
(:require
[reitit.coercion :as coercion]
(:require [reitit.coercion :as coercion]
[reitit.impl :as impl]
[reitit.spec :as rs]))

3
modules/reitit-http/src/reitit/http/spec.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.http.spec
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[reitit.exception :as exception]
[reitit.interceptor :as interceptor]
[reitit.ring.spec :as rrs]

3
modules/reitit-interceptors/src/reitit/http/interceptors/dev.clj
View file

@ -1,6 +1,5 @@
(ns reitit.http.interceptors.dev
(:require
[lambdaisland.deep-diff :as ddiff]
(:require [lambdaisland.deep-diff :as ddiff]
[lambdaisland.deep-diff.printer :as printer]
[puget.color :as color]
[reitit.core :as r]))

6
modules/reitit-interceptors/src/reitit/http/interceptors/exception.clj
View file

@ -1,11 +1,9 @@
(ns reitit.http.interceptors.exception
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[clojure.string :as str]
[reitit.coercion :as coercion]
[reitit.ring :as ring])
(:import
(java.io PrintWriter Writer)
(:import (java.io PrintWriter Writer)
(java.time Instant)))
(s/def ::handlers (s/map-of any? fn?))

6
modules/reitit-interceptors/src/reitit/http/interceptors/multipart.clj
View file

@ -1,12 +1,10 @@
(ns reitit.http.interceptors.multipart
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[reitit.coercion :as coercion]
[reitit.spec]
[ring.middleware.multipart-params :as multipart-params]
[spec-tools.core :as st])
(:import
(java.io File)))
(:import (java.io File)))
(s/def ::filename string?)
(s/def ::content-type string?)

3
modules/reitit-interceptors/src/reitit/http/interceptors/muuntaja.clj
View file

@ -1,6 +1,5 @@
(ns reitit.http.interceptors.muuntaja
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[muuntaja.core :as m]
[muuntaja.interceptor]))

3
modules/reitit-interceptors/src/reitit/http/interceptors/parameters.clj
View file

@ -1,6 +1,5 @@
(ns reitit.http.interceptors.parameters
(:require
[ring.middleware.params :as params]))
(:require [ring.middleware.params :as params]))
(defn parameters-interceptor
"Interceptor to parse urlencoded parameters from the query string and form

3
modules/reitit-malli/src/reitit/coercion/malli.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.coercion.malli
(:require
[clojure.set :as set]
(:require [clojure.set :as set]
[clojure.walk :as walk]
[malli.core :as m]
[malli.edn :as edn]

3
modules/reitit-malli/src/reitit/ring/malli.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.ring.malli
#?(:clj (:import
(java.io File))))
#?(:clj (:import (java.io File))))
#?(:clj
(def temp-file-part

3
modules/reitit-middleware/src/reitit/ring/middleware/dev.clj
View file

@ -1,6 +1,5 @@
(ns reitit.ring.middleware.dev
(:require
[lambdaisland.deep-diff :as ddiff]
(:require [lambdaisland.deep-diff :as ddiff]
[lambdaisland.deep-diff.printer :as printer]
[puget.color :as color]
[reitit.core :as r]))

6
modules/reitit-middleware/src/reitit/ring/middleware/exception.clj
View file

@ -1,11 +1,9 @@
(ns reitit.ring.middleware.exception
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[clojure.string :as str]
[reitit.coercion :as coercion]
[reitit.ring :as ring])
(:import
(java.io Writer PrintWriter)
(:import (java.io Writer PrintWriter)
(java.time Instant)))
(s/def ::handlers (s/map-of any? fn?))

6
modules/reitit-middleware/src/reitit/ring/middleware/multipart.clj
View file

@ -1,12 +1,10 @@
(ns reitit.ring.middleware.multipart
(:refer-clojure :exclude [compile])
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[reitit.coercion :as coercion]
[ring.middleware.multipart-params :as multipart-params]
[spec-tools.core :as st])
(:import
(java.io File)))
(:import (java.io File)))
(s/def ::filename string?)
(s/def ::content-type string?)

3
modules/reitit-middleware/src/reitit/ring/middleware/muuntaja.clj
View file

@ -1,6 +1,5 @@
(ns reitit.ring.middleware.muuntaja
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[muuntaja.core :as m]
[muuntaja.middleware]))

3
modules/reitit-middleware/src/reitit/ring/middleware/parameters.clj
View file

@ -1,6 +1,5 @@
(ns reitit.ring.middleware.parameters
(:require
[ring.middleware.params :as params]))
(:require [ring.middleware.params :as params]))
(def parameters-middleware
"Middleware to parse urlencoded parameters from the query string and form

6
modules/reitit-pedestal/src/reitit/pedestal.clj
View file

@ -1,12 +1,10 @@
(ns reitit.pedestal
(:require
[io.pedestal.http :as http]
(:require [io.pedestal.http :as http]
[io.pedestal.interceptor :as interceptor]
[io.pedestal.interceptor.chain :as chain]
[reitit.http]
[reitit.interceptor])
(:import
(java.lang.reflect Method)
(:import (java.lang.reflect Method)
(reitit.interceptor Executor)))
;; TODO: variadic

3
modules/reitit-ring/src/reitit/ring.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.ring
(:require
[clojure.string :as str]
(:require [clojure.string :as str]
[meta-merge.core :refer [meta-merge]]
#?@(:clj [[ring.util.mime-type :as mime-type]
[ring.util.response :as response]])

3
modules/reitit-ring/src/reitit/ring/coercion.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.ring.coercion
(:require
[reitit.coercion :as coercion]
(:require [reitit.coercion :as coercion]
[reitit.impl :as impl]
[reitit.spec :as rs]))

3
modules/reitit-ring/src/reitit/ring/spec.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.ring.spec
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[reitit.exception :as exception]
[reitit.middleware :as middleware]
[reitit.spec :as rs]))

3
modules/reitit-schema/src/reitit/coercion/schema.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.coercion.schema
(:require
[clojure.set :as set]
(:require [clojure.set :as set]
[clojure.walk :as walk]
[reitit.coercion :as coercion]
[schema-tools.coerce :as stc]

6
modules/reitit-schema/src/reitit/ring/schema.cljc
View file

@ -1,9 +1,7 @@
(ns reitit.ring.schema
(:require
[schema-tools.swagger.core :as swagger]
(:require [schema-tools.swagger.core :as swagger]
[schema.core :as s])
#?(:clj (:import
(java.io File))))
#?(:clj (:import (java.io File))))
(defrecord Upload [m]
s/Schema

3
modules/reitit-sieppari/src/reitit/interceptor/sieppari.clj
View file

@ -1,6 +1,5 @@
(ns reitit.interceptor.sieppari
(:require
[reitit.interceptor :as interceptor]
(:require [reitit.interceptor :as interceptor]
[sieppari.core :as sieppari]
[sieppari.queue :as queue]))

6
modules/reitit-spec/src/reitit/coercion/spec.cljc
View file

@ -1,14 +1,12 @@
(ns reitit.coercion.spec
(:require
[clojure.set :as set]
(:require [clojure.set :as set]
[clojure.spec.alpha :as s]
[reitit.coercion :as coercion]
[spec-tools.core :as st #?@(:cljs [:refer [Spec]])]
[spec-tools.data-spec :as ds #?@(:cljs [:refer [Maybe]])]
[spec-tools.swagger.core :as swagger])
#?(:clj
(:import
(spec_tools.core Spec)
(:import (spec_tools.core Spec)
(spec_tools.data_spec Maybe))))
(def string-transformer

3
modules/reitit-swagger-ui/src/reitit/swagger_ui.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.swagger-ui
#?(:clj (:require
[jsonista.core :as j]
#?(:clj (:require [jsonista.core :as j]
[reitit.ring :as ring])))
#?(:clj

3
modules/reitit-swagger/src/reitit/swagger.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.swagger
(:require
[clojure.set :as set]
(:require [clojure.set :as set]
[clojure.spec.alpha :as s]
[clojure.string :as str]
[meta-merge.core :refer [meta-merge]]

3
test/clj/cljdoc/reaper.clj
View file

@ -1,6 +1,5 @@
(ns cljdoc.reaper
(:require
[clojure.java.io :as io]
(:require [clojure.java.io :as io]
[clojure.pprint :as pprint]
[clojure.string :as str]))

6
test/clj/reitit/http/interceptors/exception_test.clj
View file

@ -1,6 +1,5 @@
(ns reitit.http.interceptors.exception-test
(:require
[clojure.test :refer [deftest is testing]]
(:require [clojure.test :refer [deftest is testing]]
[muuntaja.core :as m]
[reitit.coercion.spec]
[reitit.http :as http]
@ -8,8 +7,7 @@
[reitit.http.interceptors.exception :as exception]
[reitit.interceptor.sieppari :as sieppari]
[reitit.ring :as ring])
(:import
(java.sql SQLException SQLWarning)))
(:import (java.sql SQLException SQLWarning)))
(derive ::kikka ::kukka)

3
test/clj/reitit/http/interceptors/muuntaja_test.clj
View file

@ -1,6 +1,5 @@
(ns reitit.http.interceptors.muuntaja-test
(:require
[clojure.test :refer [deftest is testing]]
(:require [clojure.test :refer [deftest is testing]]
[muuntaja.core :as m]
[reitit.http :as http]
[reitit.http.interceptors.muuntaja :as muuntaja]

3
test/clj/reitit/http/interceptors/parameters_test.clj
View file

@ -1,6 +1,5 @@
(ns reitit.http.interceptors.parameters-test
(:require
[clojure.test :refer [deftest is testing]]
(:require [clojure.test :refer [deftest is testing]]
[reitit.http :as http]
[reitit.http.interceptors.parameters :as parameters]
[reitit.interceptor.sieppari :as sieppari]

6
test/clj/reitit/http_coercion_test.clj
View file

@ -1,6 +1,5 @@
(ns reitit.http-coercion-test
(:require
[clojure.test :refer [deftest is testing]]
(:require [clojure.test :refer [deftest is testing]]
[jsonista.core :as j]
[muuntaja.interceptor]
[reitit.coercion.malli :as malli]
@ -11,8 +10,7 @@
[reitit.http.coercion :as rrc]
[reitit.interceptor.sieppari :as sieppari]
[schema.core :as s])
(:import
(clojure.lang ExceptionInfo)
(:import (clojure.lang ExceptionInfo)
(java.io ByteArrayInputStream)))
(defn mounted-interceptor [app path method]

6
test/clj/reitit/http_test.clj
View file

@ -1,7 +1,6 @@
(ns reitit.http-test
"just Clojure before Sieppari is ported into cljs"
(:require
[clojure.core.async :as a]
(:require [clojure.core.async :as a]
[clojure.set :as set]
[clojure.test :refer [deftest is testing]]
[reitit.core :as r]
@ -9,8 +8,7 @@
[reitit.interceptor :as interceptor]
[reitit.interceptor.sieppari :as sieppari]
[reitit.ring :as ring])
(:import
(clojure.lang ExceptionInfo)))
(:import (clojure.lang ExceptionInfo)))
(defn interceptor [name]
{:enter (fn [ctx] (update-in ctx [:request ::i] (fnil conj []) name))})

3
test/clj/reitit/pedestal_test.clj
View file

@ -1,6 +1,5 @@
(ns reitit.pedestal-test
(:require
[clojure.test :refer [deftest is testing]]
(:require [clojure.test :refer [deftest is testing]]
[io.pedestal.http]
[io.pedestal.test]
[reitit.http :as http]

6
test/clj/reitit/ring/middleware/exception_test.clj
View file

@ -1,6 +1,5 @@
(ns reitit.ring.middleware.exception-test
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[clojure.test :refer [deftest is testing]]
[muuntaja.core :as m]
[reitit.coercion :as coercion]
@ -9,8 +8,7 @@
[reitit.ring.coercion]
[reitit.ring.middleware.exception :as exception]
[ring.util.http-response :as http-response])
(:import
(java.sql SQLException SQLWarning)))
(:import (java.sql SQLException SQLWarning)))
(derive ::kikka ::kukka)

3
test/clj/reitit/ring/middleware/muuntaja_test.clj
View file

@ -1,6 +1,5 @@
(ns reitit.ring.middleware.muuntaja-test
(:require
[clojure.test :refer [deftest is testing]]
(:require [clojure.test :refer [deftest is testing]]
[muuntaja.core :as m]
[reitit.ring :as ring]
[reitit.ring.middleware.muuntaja :as muuntaja]

3
test/clj/reitit/ring/middleware/parameters_test.clj
View file

@ -1,6 +1,5 @@
(ns reitit.ring.middleware.parameters-test
(:require
[clojure.test :refer [deftest is testing]]
(:require [clojure.test :refer [deftest is testing]]
[reitit.ring :as ring]
[reitit.ring.middleware.parameters :as parameters]
[reitit.swagger :as swagger]))

6
test/cljc/reitit/coercion_test.cljc
View file

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

6
test/cljc/reitit/core_test.cljc
View file

@ -1,11 +1,9 @@
(ns reitit.core-test
(:require
[clojure.test :refer [are deftest is testing]]
(:require [clojure.test :refer [are deftest is testing]]
[reitit.core :as r #?@(:cljs [:refer [Router]])]
[reitit.impl :as impl])
#?(:clj
(:import
(clojure.lang ExceptionInfo)
(:import (clojure.lang ExceptionInfo)
(reitit.core Router))))
(deftest reitit-test

6
test/cljc/reitit/dependency_test.cljc
View file

@ -1,9 +1,7 @@
(ns reitit.dependency-test
(:require
[clojure.test :refer [are deftest is testing]]
(:require [clojure.test :refer [are deftest is testing]]
[reitit.dependency :as rc])
#?(:clj (:import
[clojure.lang ExceptionInfo])))
#?(:clj (:import [clojure.lang ExceptionInfo])))
(deftest post-order-test
(let [base-middlewares [{:name ::bar, :provides #{:bar}, :requires #{:foo}, :wrap identity}

6
test/cljc/reitit/exception_test.cljc
View file

@ -1,14 +1,12 @@
(ns reitit.exception-test
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[clojure.test :refer [are deftest is testing]]
[reitit.core :as r]
[reitit.dev.pretty :as pretty]
[reitit.exception :as exception]
[reitit.spec :as rs])
#?(:clj
(:import
(clojure.lang ExceptionInfo))))
(:import (clojure.lang ExceptionInfo))))
(s/def ::role #{:admin :manager})
(s/def ::roles (s/coll-of ::role :into #{}))

3
test/cljc/reitit/impl_test.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.impl-test
(:require
[clojure.test :refer [are deftest is testing]]
(:require [clojure.test :refer [are deftest is testing]]
[reitit.impl :as impl]))
(deftest strip-nils-test

6
test/cljc/reitit/interceptor_test.cljc
View file

@ -1,11 +1,9 @@
(ns reitit.interceptor-test
(:require
[clojure.test :refer [are deftest is testing]]
(:require [clojure.test :refer [are deftest is testing]]
[reitit.core :as r]
[reitit.interceptor :as interceptor])
#?(:clj
(:import
(clojure.lang ExceptionInfo))))
(:import (clojure.lang ExceptionInfo))))
(def ctx (interceptor/context []))

6
test/cljc/reitit/middleware_test.cljc
View file

@ -1,11 +1,9 @@
(ns reitit.middleware-test
(:require
[clojure.test :refer [are deftest is testing]]
(:require [clojure.test :refer [are deftest is testing]]
[reitit.core :as r]
[reitit.middleware :as middleware])
#?(:clj
(:import
(clojure.lang ExceptionInfo))))
(:import (clojure.lang ExceptionInfo))))
(def request [])

6
test/cljc/reitit/ring_coercion_test.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.ring-coercion-test
(:require
[clojure.test :refer [deftest is testing]]
(:require [clojure.test :refer [deftest is testing]]
[malli.experimental.lite :as l]
#?@(:clj [[muuntaja.middleware]
[jsonista.core :as j]])
@ -13,8 +12,7 @@
[schema.core :as s]
[spec-tools.data-spec :as ds])
#?(:clj
(:import
(clojure.lang ExceptionInfo)
(:import (clojure.lang ExceptionInfo)
(java.io ByteArrayInputStream))))
(defn mounted-middleware [app path method]

6
test/cljc/reitit/ring_spec_test.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.ring-spec-test
(:require
[clojure.spec.alpha :as s]
(:require [clojure.spec.alpha :as s]
[clojure.test :refer [deftest is testing]]
[reitit.coercion.spec]
[reitit.core :as r]
@ -8,8 +7,7 @@
[reitit.ring.coercion :as rrc]
[reitit.ring.spec :as rrs])
#?(:clj
(:import
(clojure.lang ExceptionInfo))))
(:import (clojure.lang ExceptionInfo))))
(s/def ::role #{:admin :user})
(s/def ::roles (s/and (s/coll-of ::role :into #{}) set?))

6
test/cljc/reitit/ring_test.cljc
View file

@ -1,14 +1,12 @@
(ns reitit.ring-test
(:require
[clojure.set :as set]
(:require [clojure.set :as set]
[clojure.test :refer [deftest is testing]]
[reitit.core :as r]
[reitit.middleware :as middleware]
[reitit.ring :as ring]
[reitit.trie :as trie])
#?(:clj
(:import
(clojure.lang ExceptionInfo))))
(:import (clojure.lang ExceptionInfo))))
(defn mw [handler name]
(fn

6
test/cljc/reitit/spec_test.cljc
View file

@ -1,13 +1,11 @@
(ns reitit.spec-test
(:require
[#?(:clj clojure.spec.test.alpha :cljs cljs.spec.test.alpha) :as stest]
(:require [#?(:clj clojure.spec.test.alpha :cljs cljs.spec.test.alpha) :as stest]
[clojure.spec.alpha :as s]
[clojure.test :refer [are deftest is testing use-fixtures]]
[reitit.core :as r]
[reitit.spec :as rs])
#?(:clj
(:import
(clojure.lang ExceptionInfo))))
(:import (clojure.lang ExceptionInfo))))
(defn instrument-all [f]
(try

3
test/cljc/reitit/swagger_test.clj
View file

@ -1,6 +1,5 @@
(ns reitit.swagger-test
(:require
[clojure.test :refer [deftest is testing]]
(:require [clojure.test :refer [deftest is testing]]
[muuntaja.core :as m]
[reitit.coercion.malli :as malli]
[reitit.coercion.schema :as schema]

3
test/cljc/reitit/trie_test.cljc
View file

@ -1,6 +1,5 @@
(ns reitit.trie-test
(:require
[clojure.test :refer [are deftest is testing]]
(:require [clojure.test :refer [are deftest is testing]]
[reitit.trie :as trie]))
(deftest into-set-test