concurrently

babashka · Oct 19, 2024 · 60e9fcf · 60e9fcf
1 parent 826a658
commit 60e9fcf
Showing 1 changed file with 10 additions and 7 deletions.
diff --git a/src/babashka/process.cljc b/src/babashka/process.cljc
@@ -732,13 +732,16 @@
          proc-fn (fn [command]
                    (let [id (swap! counter inc)]
                      (prn "command" command)
-                     (apply process
-                            {:in :inherit
-                             :out-line-fn (fn [line]
-                                            (println (format "[%s]" id) line))
-                             :err-line-fn (fn [line]
-                                            (println (format "[%s]" id) line))}
-                            command)))
+                     (let [command (if (string? command)
+                                     [command]
+                                     command)]
+                       (apply process
+                              {:in :inherit
+                               :out-line-fn (fn [line]
+                                              (println (format "[%s]" id) line))
+                               :err-line-fn (fn [line]
+                                              (println (format "[%s]" id) line))}
+                              command))))
          procs (map proc-fn commands)]
      (doseq [p procs]
        (check p)))))