branch: externals/listen
commit 257cca887938cb7e155b8eab2db58951fb1b6c18
Author: Adam Porter <a...@alphapapa.net>
Commit: Adam Porter <a...@alphapapa.net>
Fix: (listen-queue-revert-track) Set metadata slot
---
README.org | 1 +
docs/README.org | 1 +
listen-queue.el | 1 +
3 files changed, 3 insertions(+)
diff --git a/README.org b/README.org
index 61b9d22d11..43aff9f4ce 100644
--- a/README.org
+++ b/README.org
@@ -233,6 +233,7 @@ The ~listen-mode~ minor mode runs a timer which plays the
next track in the curr
*Fixes*
- Command ~listen-queue-add-from-mpd~.
- Indication of currently playing queue in queue list.
+- Set metadata slot when reverting track from disk.
** v0.7
diff --git a/docs/README.org b/docs/README.org
index 44dde46bbd..955e09010d 100644
--- a/docs/README.org
+++ b/docs/README.org
@@ -245,6 +245,7 @@ The ~listen-mode~ minor mode runs a timer which plays the
next track in the curr
*Fixes*
+ Command ~listen-queue-add-from-mpd~.
+ Indication of currently playing queue in queue list.
++ Set metadata slot when reverting track from disk.
** v0.7
diff --git a/listen-queue.el b/listen-queue.el
index 38c846510b..c12432352c 100644
--- a/listen-queue.el
+++ b/listen-queue.el
@@ -552,6 +552,7 @@ with \"ffprobe\"."
;; by MPD).
(dolist (slot '(artist title album number date genre etc))
;; FIXME: Store metadata in its own slot and don't misuse etc slot.
+ (setf (listen-track-metadata track) (listen-track-etc new-track))
(setf (cl-struct-slot-value 'listen-track slot track)
(cl-struct-slot-value 'listen-track slot new-track)))))
