meissa/mastodon-bot
Archived
7
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

provide auth predicate

Browse source
This commit is contained in:
jem 2021-03-12 18:23:38 +01:00
parent 31717823c4
commit d65c558cdc
2 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
shadow-cljs.edn
View file

@ -3,7 +3,7 @@
"src/test/cljc" "src/test/cljc"
"src/test/cljs"] "src/test/cljs"]
:dependencies [[orchestra "2019.02.06-1"] :dependencies [[orchestra "2019.02.06-1"]
[expound "0.8.4"]] [expound "0.8.9"]]
:builds {:test {:target :node-test :builds {:test {:target :node-test
:output-to "target/node-tests.js" :output-to "target/node-tests.js"
:autorun true :autorun true

7
src/main/cljc/mastodon_bot/core_domain.cljc
View file

@ -10,8 +10,13 @@
(s/def ::mastodon md/mastodon-auth?) (s/def ::mastodon md/mastodon-auth?)
(s/def ::twitter twd/twitter-auth?) (s/def ::twitter twd/twitter-auth?)
(s/def ::tumblr td/tumblr-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 ::transform trd/transformations?)
(s/def ::auth (s/keys :opt-un [::mastodon ::twitter ::tumblr]))
(def config? (def config?
(s/keys :req-un [::auth ::transform])) (s/keys :req-un [::auth ::transform]))