near/airsonic-ui
1
0
Fork 0
mirror of https://github.com/heyarne/airsonic-ui.git synced 2026-05-07 02:33:39 +02:00
Code Issues Projects Releases Wiki Activity

Spring cleaning

Browse source 
* Remove unused subs
* Move cover urls into subscriptios
* Check if TODOs and FIXMEs are still up to date
This commit is contained in:
Arne Schlüter 2018-06-12 00:54:42 +02:00
commit a175fb3d34
6 changed files with 65 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

14
src/cljs/airsonic_ui/views/cover.cljs
View file

@ -3,7 +3,6 @@
[re-frame.core :refer [subscribe]]
[reagent.core :as reagent]
[airsonic-ui.subs :as subs]
[airsonic-ui.utils.api :as api]
["@hugojosefson/color-hash" :as ColorHash]))
(def color-hash (ColorHash.))
@ -20,8 +19,6 @@
[(mod (+ h (* h 0.3) 10) 360) s l]]
(map #(str "hsl(" (str/join "," %) ")")))))
;; FIXME: The direct dependency on these subs is a bit ugly
(defn generate-cover [canvas item]
(let [ctx (.getContext canvas "2d")
size (.-clientWidth canvas)
@ -57,13 +54,14 @@
(defn has-cover? [item]
(:coverArt item))
;; FIXME: The direct dependency on these subs is a bit ugly
(defn cover
[item size]
(let [server @(subscribe [::subs/server])
login @(subscribe [::subs/login])
url (partial api/cover-url server login item)]
(let [original @(subscribe [::subs/cover-url item size])
retina @(subscribe [::subs/cover-url item (* 2 size)])]
[:figure {:class-name (str "image is-" size "x" size)}
(if (has-cover? item)
[:img {:src (url size)
:srcSet (str (url size) ", " (url (* 2 size)) " 2x")}]
[:img {:src original
:srcSet (str original ", " retina " 2x")}]
[missing-cover item size])]))