This page is not created by, affiliated with, or supported by Slack Technologies, Inc.
2022-04-08
Channels
- # announcements (8)
- # aws (2)
- # babashka (11)
- # babashka-sci-dev (39)
- # beginners (62)
- # calva (5)
- # cider (1)
- # clj-kondo (50)
- # cljdoc (2)
- # cljs-dev (6)
- # clojure (52)
- # clojure-austin (22)
- # clojure-czech (13)
- # clojure-europe (88)
- # clojure-nl (1)
- # clojure-norway (5)
- # clojure-uk (6)
- # clojuredesign-podcast (13)
- # clojurescript (45)
- # community-development (3)
- # core-typed (31)
- # cursive (12)
- # datahike (2)
- # datalevin (7)
- # datomic (5)
- # events (1)
- # exercism (11)
- # fulcro (27)
- # gratitude (1)
- # holy-lambda (3)
- # hoplon (2)
- # introduce-yourself (2)
- # jobs (1)
- # lambdaisland (3)
- # lsp (110)
- # malli (2)
- # meander (4)
- # music (2)
- # off-topic (50)
- # overtone (1)
- # pathom (13)
- # polylith (26)
- # re-frame (4)
- # releases (2)
- # rewrite-clj (3)
- # ring (12)
- # shadow-cljs (20)
- # specter (4)
- # tools-deps (8)
- # xtdb (40)
Starting to dogfood Facai a little more
(deftest contact-handler-test
(let [handler (:grid.contacts/list-contacts-handler sys/*system*)
user (sys/create! factories/user)
org-user (sys/create! factories/organization-user {:with {:user-id (:id user)}})]
(doseq [name ["a" "b" "c"]]
(let [contact (sys/create! factories/contact
{:with {:name name
:org-id (:organization-id org-user)
:created-by (:id user)}})]
(sys/create!
factories/email
{:with {:email (str name "@example.com")
:contact-id (:id contact)
:created-by (:id user)}})))
(is (match?
{:status 200
:body
(matchers/in-any-order
[{:name "a" :email ""}
{:name "b" :email ""}
{:name "c" :email ""}])}
(handler {:identity (:email user)})))))