[elpa] externals/listen 2572ecbc18 8/8: Merge: v0.5.1

[ELPA Syncer]

branch: externals/listen
commit 2572ecbc1821af2a0b50ab7c87cac8de8462c89c
Merge: bcd8642655 066b216b4b
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Merge: v0.5.1
---
 README.org      | 5 +++++
 listen-queue.el | 5 +++--
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/README.org b/README.org
index 93f9fffa49..d7211f85ce 100644
--- a/README.org
+++ b/README.org
@@ -75,6 +75,11 @@ Use the command ~listen~ to show the Transient menu.  From 
there, it is--hopeful
 *Changes*
 + Face ~listen-album~ slants italic.
 
+** v0.5.1
+
+*Fixes*
++ Viewing queues which aren't currently playing.
+
 ** v0.5
 
 *Additions*
diff --git a/listen-queue.el b/listen-queue.el
index 8aa437dbcf..dd134b7e88 100644
--- a/listen-queue.el
+++ b/listen-queue.el
@@ -114,8 +114,9 @@ intended to be set from the `listen-menu'."
                            ;; We compare filenames in case the queue's files
                            ;; have been refreshed from disk, in which case
                            ;; the track objects would no longer be `eq'.
-                           (if (equal (listen-track-filename track)
-                                      (listen-track-filename 
(listen-queue-current queue)))
+                           (if-let ((current-track (listen-queue-current 
queue))
+                                    ((equal (listen-track-filename track)
+                                            (listen-track-filename 
current-track))))
                                (progn
                                  (unless (eq (listen-queue-current 
listen-queue) track)
                                    ;; HACK: Update current track in queue.  I 
don't know a