ну, если у топикстартера вообще используется integrant.repl.state, что не факт

А вот тогда такой вопрос, как скомпоновать роуты и хендлеры? Плюс ещё зависимости определённые через ig/ref к ним добавлять

Ну, тогда просто то, что возвращается из init

Например :handler/index у меня по пути "/" и ему нужна :db, а для :handler/page "/page/:id" и в зависимостях :db и :analitycs

там в главе про это написано. Роуты это компонент, который зависит от db и остального

Ну то есть если использовать  bidi, то будет что-то вроде такого?

(defmethod ig/init-key :handler 
  [_ {:keys [db analytics]}]
  (make-handler ["/" {"" (partial index-handler db)
                      ["page/" :id] (partial page-handler db analytics)}]))

Или вообще как-то так

{:app {:handlers #ig/refset :handler}}

(derive :handler/index :handler)
(derive :handler/page :handler)

(defmethod ig/init-key :app 
  [_ {:keys [handlers]}] 
  (make-handler ...))

биди нужен просто чтобы сопоставить роут, а что дальше остается на твое усмотрение

если сопоставление прошло, ты получишь ключ роута. Наверное, твой компоннет должен сначала попытаться сопоставить, и если да, то вызвать хендлер-мульт с зависимостями

(defmethod ig/init-key :handler 
  [_ {:keys [db analytics]}]
  (make-handler ["/" {"" (partial index-handler db)
                      ["page/" :id] (partial page-handler db analytics)}]))

можно так например:

(require '[integrant.core :as ig])
(require '[bidi.bidi :as bidi])

(defmethod ig/init-key ::handler [_ routes]
  (fn [r]
    (when-let [{:keys [handler route-params]} (bidi/match-route routes (:uri r))]
      (handler (assoc r :route-params route-params)))))

(defmethod ig/init-key ::user [_ {:keys [dependency]}]
  (fn [{{:keys [id]} :route-params}]
    {:status 200
     :body (format "Hey, %s, my dependency is %s" id dependency)}))


(def config
  {::handler ["/"
              {"users/" {[:id "/get"] (ig/ref ::user)}}]
   ::user {:dependency :lala}})

(= (let [system (ig/init config)]
     (try
       ((::handler system) {:uri "/users/andrew/get"})
       (finally
         (ig/halt! system))))
   {:status 200, :body "Hey, andrew, my dependency is :lala"})

еще можно всякого сахара навернуть как вот тут например https://github.com/druids/duct.module.bidi

все что душа пожелает!

А есть какая-нибудь функция вроде or только с семантикой some?
Может быть она есть в каких-то утилитах?
Чтобы (X nil nil false) вернуло false.

даже не функция, а макрос

(require '[integrant.core :as ig])
(require '[bidi.bidi :as bidi])

(defmethod ig/init-key ::handler [_ routes]
  (fn [r]
    (when-let [{:keys [handler route-params]} (bidi/match-route routes (:uri r))]
      (handler (assoc r :route-params route-params)))))

(defmethod ig/init-key ::user [_ {:keys [dependency]}]
  (fn [{{:keys [id]} :route-params}]
    {:status 200
     :body (format "Hey, %s, my dependency is %s" id dependency)}))


(def config
  {::handler ["/"
              {"users/" {[:id "/get"] (ig/ref ::user)}}]
   ::user {:dependency :lala}})

(= (let [system (ig/init config)]
     (try
       ((::handler system) {:uri "/users/andrew/get"})
       (finally
         (ig/halt! system))))
   {:status 200, :body "Hey, andrew, my dependency is :lala"})

Мне нравится, спасибо

(or nil nil false) возвращает false

(or nil nil false true)
пардон

(not (or nil nil false true))
=> false

😊

(or nil nil false [1 2 3])