branch: externals/listen
commit 748a148188fbcd5a5777e79663225638633ab192
Author: Adam Porter <a...@alphapapa.net>
Commit: Adam Porter <a...@alphapapa.net>
Fix: (listen-current-player)
I thought that DEFVAR could be used there, but apparently not.
---
listen-lib.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/listen-lib.el b/listen-lib.el
index 7287e774f4..85d400f09e 100644
--- a/listen-lib.el
+++ b/listen-lib.el
@@ -141,8 +141,9 @@ return a list of values; otherwise return the sole value."
(defun listen-current-player ()
"Return variable `listen-player' or a newly set one if nil."
+ (defvar listen-backend)
(or listen-player
- (setf listen-player (funcall (defvar listen-backend)))))
+ (setf listen-player (funcall listen-backend))))
(cl-defun listen-current-track (&optional (player listen-player))
"Return track playing on PLAYER, if any."
