branch: externals/listen
commit b3431f035a5cb599021ea354d4e0cf9282950ae7
Author: Adam Porter <[email protected]>
Commit: Adam Porter <[email protected]>
Fix: (listen-next) Interactive form
Emacs 30 complains that the declare-function form was first.
---
README.org | 1 +
docs/README.org | 1 +
listen.el | 2 +-
3 files changed, 3 insertions(+), 1 deletion(-)
diff --git a/README.org b/README.org
index 93e7c8720e..bf059c81f1 100644
--- a/README.org
+++ b/README.org
@@ -213,6 +213,7 @@ The ~listen-mode~ minor mode runs a timer which plays the
next track in the curr
- Playing next track in queue after current track has been removed.
- Command ~listen-queue-goto-current~ automatically shows the queue's buffer.
- Updating vtables for Emacs versions before 30.
+- Minor fixes for Emacs 30 compatibility.
** v0.9
/Released without additional changes due to change in ELPA recipe./
diff --git a/docs/README.org b/docs/README.org
index cb12f709c7..5edf3e3be6 100644
--- a/docs/README.org
+++ b/docs/README.org
@@ -250,6 +250,7 @@ The ~listen-mode~ minor mode runs a timer which plays the
next track in the curr
+ Playing next track in queue after current track has been removed.
+ Command ~listen-queue-goto-current~ automatically shows the queue's buffer.
+ Updating vtables for Emacs versions before 30.
++ Minor fixes for Emacs 30 compatibility.
** v0.9
diff --git a/listen.el b/listen.el
index 9cf202e6fd..a4e5e5c85f 100755
--- a/listen.el
+++ b/listen.el
@@ -144,8 +144,8 @@ Interactively, uses the default player."
(defun listen-next (player)
"Play next track in PLAYER's queue.
Interactively, uses the default player."
- (declare-function listen-queue-next "listen-queue")
(interactive (list (listen-current-player)))
+ (declare-function listen-queue-next "listen-queue")
(listen-queue-next (map-elt (listen-player-etc player) :queue)))
(defun listen-pause (player)
