diff options
author | Colin Okay <colin@cicadas.surf> | 2022-10-29 13:04:47 -0500 |
---|---|---|
committer | Colin Okay <colin@cicadas.surf> | 2022-10-29 13:04:47 -0500 |
commit | 8b526da8cd8c92ca0d68e62915bd8cf14df4f4cd (patch) | |
tree | bb5e4d007b93e55d68c469cae74e02fc6aeb91aa /playlist.lisp | |
parent | 46371385ee5d95217b7b1fb636e17d9277835f69 (diff) |
Add: Basic style
Diffstat (limited to 'playlist.lisp')
-rw-r--r-- | playlist.lisp | 24 |
1 files changed, 14 insertions, 10 deletions
diff --git a/playlist.lisp b/playlist.lisp index 08c2bbb..10ba039 100644 --- a/playlist.lisp +++ b/playlist.lisp @@ -399,16 +399,20 @@ (with-clog-create body (div () (navigation-header ()) - (section (:h2) - (:span (:bind title-elem :content (playlist-title pl))) - (form-element (:text :bind input)) - (:span (:content " -- ")) - (:span (:bind dur-elem :content (secs-to-hms (playlist-duration pl))))) - - (now-playing-display (ctl)) - (track-listing (pl)) - (new-track-form (pl)) - (editor-managment (pl))) + (div (:class "row") + (div () + (now-playing-display (ctl))) + (div () + (section (:h2) + (:span (:bind title-elem :content (playlist-title pl))) + (form-element (:text :bind input)) + (:span (:content " -- ")) + (:span (:bind dur-elem :content (secs-to-hms (playlist-duration pl))))) + (track-listing (pl)))) + (div (:class "row") + (div () + (new-track-form (pl)) + (editor-managment (pl))))) (setf (pl-title ctl) title-elem (pl-dur ctl) dur-elem (display input) "none" |