branch: externals/listen
commit 4b0ac14cd91290ff1b17590cdbebbdaf651d0388
Author: Adam Porter <a...@alphapapa.net>
Commit: Adam Porter <a...@alphapapa.net>
Fix: (listen-mode--update) Ensure player process is running
Otherwise, the first time this is called after the player is killed,
an error is signaled.
---
listen.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/listen.el b/listen.el
index e21f769f0b..78699be06c 100755
--- a/listen.el
+++ b/listen.el
@@ -298,7 +298,7 @@ According to `listen-lighter-format', which see."
(defun listen-mode--update (&rest _ignore)
"Play next track and/or update variable `listen-mode-lighter'."
(let (playing-next-p)
- (when listen-player
+ (when (and listen-player (listen--running-p listen-player))
(unless (or (listen--playing-p listen-player)
;; HACK: It seems that sometimes the player gets restarted
;; even when paused: this extra check should prevent that.
