Tasks: fix edge case

src/babashka/impl/tasks.clj

@@ -158,6 +158,7 @@
     (format "
 (let [chans (filter babashka.tasks/-chan? %s)]
   (loop [cs chans]
+    (when (seq cs)
       (let [[v p] (clojure.core.async/alts!! cs)
             [task-name v] v
             cs (filterv #(not= p %%) cs)
@@ -168,7 +169,6 @@
           (throw (ex-info (ex-message v)
                           {:babashka/exit 1
                            :data (ex-data v)})))
-      (when (seq cs)
         (recur cs)))))" deps)
     "")
   #_(format "(def %s (babashka.tasks/-wait %s))" dep dep))