[elpa] externals/listen 86e6677c6b 056/103: Fix

[ELPA Syncer]

branch: externals/listen
commit 86e6677c6b149cafe2bc4314839890406fe66646
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Fix
---
 listen-queue.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/listen-queue.el b/listen-queue.el
index 15e208aaf0..c1b6cf7085 100644
--- a/listen-queue.el
+++ b/listen-queue.el
@@ -255,10 +255,10 @@ PROMPT is passed to `format-prompt', which see."
   (interactive
    (let ((queue (listen-queue-complete))
          (path (expand-file-name (read-file-name "Enqueue file/directory: " 
listen-directory nil t))))
-     (list queue
-           (if (file-directory-p path)
+     (list (if (file-directory-p path)
                (directory-files-recursively path ".")
-             (list path)))))
+             (list path))
+           queue)))
   (cl-callf append (listen-queue-tracks queue) (delq nil (mapcar 
#'listen-queue-track files)))
   (listen-queue--update-buffer queue)
   queue)