diff options
Diffstat (limited to 'src/backend/tau/api/service.clj')
-rw-r--r-- | src/backend/tau/api/service.clj | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/src/backend/tau/api/service.clj b/src/backend/tau/api/service.clj index de2e994..b9f0e1d 100644 --- a/src/backend/tau/api/service.clj +++ b/src/backend/tau/api/service.clj @@ -10,15 +10,16 @@ (defrecord Service [id info base-url kiosk-list]) -(defn get-service-info +(defn get-info [service] (map->Service {:id (.getServiceId service) :info (j/from-java (.getServiceInfo service)) :base-url (.getBaseUrl service) - :kiosk-list (map #(kiosk/get-kiosk-info % (.getServiceId service)) - (.getAvailableKiosks (.getKioskList service)))})) + ;; :kiosk-list (map #(kiosk/get-info % (.getServiceId service)) + ;; (.getAvailableKiosks (.getKioskList service))) + })) -(defn get-service-list-info +(defn get-services [] - (map #(get-service-info %) (NewPipe/getServices))) + (map #(get-info %) (NewPipe/getServices))) |