branch: externals/listen
commit ad104ebe5ac3b85545e37634c28f3b33617bb76b
Author: Adam Porter <[email protected]>
Commit: Adam Porter <[email protected]>

    Fix: (listen-queue--add-track-durations) make-process argument
    
    Has it been wrong all this time?
---
 listen-queue.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/listen-queue.el b/listen-queue.el
index e409e34099..3d8c236eda 100644
--- a/listen-queue.el
+++ b/listen-queue.el
@@ -879,10 +879,11 @@ MAX-PROCESSES limits the number of parallel probing 
processes."
                                      "-show_entries" "format=duration"
                                      (expand-file-name (listen-track-filename 
track))))
                       (process (make-process
-                                :name "listen:ffprobe" :noquery t :type 'pipe 
:buffer (current-buffer)
-                                :sentinel sentinel :command (if 
listen-queue-nice-p
-                                                                (cons "nice" 
command)
-                                                              command))))
+                                :name "listen:ffprobe" :noquery t 
:connection-type 'pipe
+                                :buffer (current-buffer) :sentinel sentinel
+                                :command (if listen-queue-nice-p
+                                             (cons "nice" command)
+                                           command))))
                  process))))
          (probe-more ()
            (while (and tracks (length< processes max-processes))

Reply via email to