From e4eac9bd93140d56f84e964a75a548ea79d4d17e Mon Sep 17 00:00:00 2001
From: Leonardo Taglialegne <cmt.miniBill@gmail.com>
Date: Fri, 12 Apr 2024 06:58:09 +0200
Subject: [PATCH] Use sequential combination where appropriate

---
 src/Cli.elm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/src/Cli.elm b/src/Cli.elm
index 07ffda9..872a8ed 100644
--- a/src/Cli.elm
+++ b/src/Cli.elm
@@ -167,7 +167,7 @@ generateFileFromOpenApiSpec config apiSpec =
                 warnings
                     |> List.Extra.gatherEqualsBy .message
                     |> List.map logWarning
-                    |> BackendTask.combine
+                    |> doAll
                     |> BackendTask.map (\_ -> decls)
             )
         |> BackendTask.andThen
@@ -258,8 +258,7 @@ logWarning ( head, tail ) =
     in
     (firstLine :: paths)
         |> List.map Pages.Script.log
-        |> BackendTask.combine
-        |> BackendTask.map (\_ -> ())
+        |> doAll