From dda25240553486522c953e7a1f43ae67dbe2f22a Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bsima.me>
Date: Wed, 17 Feb 2021 20:28:51 -0500
Subject: Fixup some modules

---
 Biz/Bild.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'Biz')

diff --git a/Biz/Bild.hs b/Biz/Bild.hs
index 39d8aaf..eee7eb4 100644
--- a/Biz/Bild.hs
+++ b/Biz/Bild.hs
@@ -478,7 +478,10 @@ run Proc {..} = do
         Async.runConcurrently
           <| Async.Concurrently (puts stdout_)
           *> (Async.Concurrently <| Conduit.waitForStreamingProcess cph)
-      else Async.runConcurrently <| Async.Concurrently <| Conduit.waitForStreamingProcess cph
+      else
+        Async.runConcurrently
+          <| Async.Concurrently
+          <| Conduit.waitForStreamingProcess cph
   if isFailure exitcode
     then puts stderr_ >> onFailure >> return exitcode
     else onSuccess >> return exitcode
-- 
cgit v1.2.3