provide auth predicate
This commit is contained in:
parent
31717823c4
commit
d65c558cdc
2 changed files with 7 additions and 2 deletions
|
@ -3,7 +3,7 @@
|
|||
"src/test/cljc"
|
||||
"src/test/cljs"]
|
||||
:dependencies [[orchestra "2019.02.06-1"]
|
||||
[expound "0.8.4"]]
|
||||
[expound "0.8.9"]]
|
||||
:builds {:test {:target :node-test
|
||||
:output-to "target/node-tests.js"
|
||||
:autorun true
|
||||
|
|
|
@ -10,8 +10,13 @@
|
|||
(s/def ::mastodon md/mastodon-auth?)
|
||||
(s/def ::twitter twd/twitter-auth?)
|
||||
(s/def ::tumblr td/tumblr-auth?)
|
||||
|
||||
(def auth?
|
||||
(s/keys :opt-un [::mastodon ::twitter ::tumblr]))
|
||||
(s/def ::auth auth?)
|
||||
|
||||
(s/def ::transform trd/transformations?)
|
||||
(s/def ::auth (s/keys :opt-un [::mastodon ::twitter ::tumblr]))
|
||||
|
||||
(def config?
|
||||
(s/keys :req-un [::auth ::transform]))
|
||||
|
||||
|
|
Reference in a new issue