From 73abffcfe566a7ec41e3fb7dbfc5d313fb0bc913 Mon Sep 17 00:00:00 2001
From: Yuchen Pei <hi@ypei.me>
Date: Fri, 26 Nov 2021 11:21:02 +1100
Subject: Fall back to description property when showing description
---
emms.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/emms.el b/emms.el
index 2186853..92ccea8 100644
--- a/emms.el
+++ b/emms.el
@@ -722,8 +722,10 @@ return the type and the name with a colon in between.
Hex-encoded characters in URLs are replaced by the decoded
character."
(let ((type (emms-track-type track)))
- (cond ((eq 'file type)
- (emms-track-name track))
+ (cond ((emms-track-get track 'description)
+ (emms-track-get track 'description))
+ ((eq 'file type)
+ (emms-track-name track))
((eq 'url type)
(emms-format-url-track-name (emms-track-name track)))
(t (concat (symbol-name type)
--
cgit v1.2.3