Makes multiple client selection somewhat possible via graphql.
This commit is contained in:
@@ -23,6 +23,28 @@
|
||||
(when (:user db)
|
||||
(sort-by :name (vals (:clients db))))))
|
||||
|
||||
(re-frame/reg-sub
|
||||
::selected-clients
|
||||
(fn [db]
|
||||
(let [selected-clients (:selected-clients db)]
|
||||
(cond (= :mine selected-clients)
|
||||
(sort-by :name
|
||||
(:user/clients (parse-jwt (:user db))))
|
||||
|
||||
(or (and (sequential? selected-clients)
|
||||
(empty? selected-clients))
|
||||
(= :all selected-clients)
|
||||
(nil? selected-clients))
|
||||
(sort-by :name
|
||||
(vals
|
||||
(:clients db)))
|
||||
|
||||
(sequential? selected-clients)
|
||||
selected-clients
|
||||
|
||||
:else
|
||||
nil))))
|
||||
|
||||
(re-frame/reg-sub
|
||||
::client-refs
|
||||
:<- [::clients]
|
||||
|
||||
Reference in New Issue
Block a user