 
   (d/transact db-conn [[:db/add [:team/domain "abc"] :team/schedule "* * F * *"]])
 
+  (d/pull (d/db db-conn) [:team/domain :team/schedule] [:team/domain "abc"])
 
 
 


(defn -main [db-uri]
  (let [scheduler (scheduler/start (scheduler/initialize))
        db-conn (d/connect db-uri)
        db (d/db db-conn)]
    (init-start-jobs scheduler db)
    (listen-for-team-updates scheduler db-conn)))

(comment


(defn submit-answers [db-conn domain user answers]
  ;; TODO insert into datomic db
  (let [db (d/db db-conn)
        user-eid (d/q '[:find ?member .
                        :in $ domain user
                        :where
                        [?team :team/domain domain]
                        [?team :team/members ?member]
                        [?member :member/name ?user]]
                      db domain user)
        tx (for [answer answers]
             {:db/id (d/tempid :db.part/user)
              :answer/author user-eid
              :answer/text (:answer answer)
              :answer/ts (:ts answer)
              :_question/answers (:question answer)})]
    @(d/transact db-conn tx)))

(defjob QuestionnaireJob [{:keys [domain db-conn]}]
  (let [db (d/db db-conn)
