summaryrefslogtreecommitdiff
path: root/playlist.lisp
diff options
context:
space:
mode:
authorColin Okay <colin@cicadas.surf>2022-10-30 18:01:54 -0500
committerColin Okay <colin@cicadas.surf>2022-10-30 18:01:54 -0500
commitaca3f9e03e5768cce31cbb560fa312a87ab7d49b (patch)
treed396560a9622cf0202aafa640710807338821e99 /playlist.lisp
parent32ed79e62f1c045c8a62504f76b8d505a1988f98 (diff)
Tweaks
Diffstat (limited to 'playlist.lisp')
-rw-r--r--playlist.lisp5
1 files changed, 3 insertions, 2 deletions
diff --git a/playlist.lisp b/playlist.lisp
index c222395..4eaba3d 100644
--- a/playlist.lisp
+++ b/playlist.lisp
@@ -269,12 +269,13 @@
(defun create-track-list-item (list track ctl)
(with-clog-create list
(list-item (:bind container)
+
+ (div (:bind item :class "track-list-item")
+ (section (:pre :content (track-listing-line track))))
(div (:bind edit-controls)
(button (:content "delete " :bind delbtn))
(button (:content "↓" :bind downbtn))
(button (:content "↑" :bind upbtn)))
- (div (:bind item :class "track-list-item")
- (section (:pre :content (track-listing-line track))))
(audio (:source (media-url-path track) :controls nil :bind audio)))
(let ((track-ctl
(make-instance 'track-ctl