summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Moc <personal@cdatgoose.org>2026-04-06 06:44:36 +0200
committerDavid Moc <personal@cdatgoose.org>2026-04-06 06:44:36 +0200
commitbb4b6fe1e08941c6a8ba247c44c1a03d4ab3ca94 (patch)
tree8b9d6fd77ad2950aab9fea0cc41f8a95882a67ee
parent5c331f5c40a6a817e054fef999db3de3d2b276ab (diff)
Quick ui changes.
Signed-off-by: David Moc <personal@cdatgoose.org>
-rwxr-xr-xnaviel.el27
1 files changed, 14 insertions, 13 deletions
diff --git a/naviel.el b/naviel.el
index b9742aa..c0815d2 100755
--- a/naviel.el
+++ b/naviel.el
@@ -659,17 +659,20 @@
(state (if naviel--paused
(propertize "⏸ paused" 'face 'naviel-paused-face)
(propertize "▶ playing" 'face 'naviel-now-playing-face))))
- (insert (format " %s\n\n" state))
- (insert (format " %s %s\n"
- (propertize "Title:" 'face 'naviel-radio-face)
- (propertize (naviel--trunc title (min 52 (- w 4)))
- 'face 'naviel-now-playing-face)))
- (insert (format " %s %s\n"
- (propertize "By:" 'face 'naviel-radio-face)
- (propertize (naviel--trunc artist 40) 'face 'naviel-artist-face)))
- (insert (format " %s %s\n\n"
- (propertize "In:" 'face 'naviel-radio-face)
- (propertize (naviel--trunc album 40) 'face 'naviel-album-face)))
+ (if naviel--paused
+ (insert (format " %s\n\n" state))
+ (progn (insert (format " %s %s\n"
+ (propertize "Title:" 'face 'naviel-radio-face)
+ (propertize (naviel--trunc title (min 52 (- w 4)))
+ 'face 'naviel-now-playing-face)))
+ (insert (format " %s %s\n"
+ (propertize "By:" 'face 'naviel-radio-face)
+ (propertize (naviel--trunc artist 40) 'face 'naviel-artist-face)))
+ (insert (format " %s %s\n\n"
+ (propertize "In:" 'face 'naviel-radio-face)
+ (propertize (naviel--trunc album 40) 'face 'naviel-album-face)))
+ ))
+
;; ── Progress bar ──
(let* ((elap naviel--elapsed)
@@ -705,8 +708,6 @@
(defun naviel--player-insert-lyrics ()
"Insert the lyrics section into the player buffer."
(insert (propertize " Lyrics\n" 'face 'naviel-breadcrumb-face))
- (insert (propertize (make-string 30 ?╌) 'face 'naviel-separator-face))
- (insert "\n\n")
(cond
;; Synced lyrics
(naviel--lrc-lines