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

Display all album titles in a table

Browse source
This commit is contained in:
Arne Schlüter 2018-06-03 17:02:30 +02:00
commit 0092a3985f
2 changed files with 14 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

12
src/cljs/airsonic_ui/views/song.cljs
View file

@ -1,7 +1,8 @@
(ns airsonic-ui.views.song (ns airsonic-ui.views.song
(:require [re-frame.core :refer [dispatch]] (:require [re-frame.core :refer [dispatch]]
[airsonic-ui.events :as events] [airsonic-ui.events :as events]
[airsonic-ui.routes :as routes :refer [url-for]])) [airsonic-ui.routes :as routes :refer [url-for]]
[airsonic-ui.views.icon :refer [icon]]))
(defn item [songs song] (defn item [songs song]
(let [artist-id (:artistId song)] (let [artist-id (:artistId song)]
@ -19,5 +20,10 @@
;; FIXME: This is very similar to album-listing ;; FIXME: This is very similar to album-listing
(defn listing [songs] (defn listing [songs]
[:ul (for [[idx song] (map-indexed vector songs)] [:table.table.is-striped.is-hoverable.is-fullwidth>tbody
[:li {:key idx} [item songs song]])]) (for [[idx song] (map-indexed vector songs)]
^{:key idx} [:tr
[:td.grow [item songs song]]
;; FIXME: Not implemented yet
[:td>a {:title "Play next"} [icon :plus]]
[:td>a {:title "Play last"} [icon :arrow-thick-right]]])])

5
src/sass/app.sass
View file

@ -61,3 +61,8 @@
height: auto height: auto
max-width: 256px max-width: 256px
max-height: 256px max-height: 256px
// occurs in album detail view
.table
.grow
width: 100%