From e71fdc8dbac5c77d6c2fd252f31fc12cd6375e30 Mon Sep 17 00:00:00 2001 From: Miguel Ángel Moreno Date: Tue, 20 Dec 2022 00:35:56 +0100 Subject: fix: Fix related streams on API endpoints --- src/backend/tau/api/service.clj | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'src/backend/tau/api/service.clj') 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))) -- cgit v1.2.3