mirror of
https://github.com/heyarne/airsonic-ui.git
synced 2026-05-06 18:33:38 +02:00
25 lines
373 B
Clojure
25 lines
373 B
Clojure
(ns airsonic-ui.subs
|
|
(:require [re-frame.core :as re-frame]))
|
|
|
|
;; can be used to query the user's credentials
|
|
|
|
(re-frame/reg-sub
|
|
::login
|
|
(fn [db]
|
|
(:login db)))
|
|
|
|
;; current hashbang
|
|
|
|
(re-frame/reg-sub
|
|
::current-route
|
|
(fn [db]
|
|
(:current-route db)))
|
|
|
|
;; ---
|
|
|
|
;; TODO: Make this nice and clean
|
|
|
|
(re-frame/reg-sub
|
|
::current-content
|
|
(fn [db]
|
|
(-> db :response)))
|