diff options
Diffstat (limited to 'src/backend/tau/api/service.clj')
-rw-r--r-- | src/backend/tau/api/service.clj | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/src/backend/tau/api/service.clj b/src/backend/tau/api/service.clj deleted file mode 100644 index b9f0e1d..0000000 --- a/src/backend/tau/api/service.clj +++ /dev/null @@ -1,25 +0,0 @@ -(ns tau.api.service - (:require - [clojure.java.data :as j] - [tau.api.kiosk :as kiosk]) - (:import - org.schabi.newpipe.extractor.NewPipe - org.schabi.newpipe.extractor.kiosk.KioskList - org.schabi.newpipe.extractor.StreamingService)) - -(defrecord Service - [id info base-url kiosk-list]) - -(defn get-info - [service] - (map->Service - {:id (.getServiceId service) - :info (j/from-java (.getServiceInfo service)) - :base-url (.getBaseUrl service) - ;; :kiosk-list (map #(kiosk/get-info % (.getServiceId service)) - ;; (.getAvailableKiosks (.getKioskList service))) - })) - -(defn get-services - [] - (map #(get-info %) (NewPipe/getServices))) |