cosmetic: change the indentation a bit
commitb3c97d2d5dfcb17587571cf2b0692d8b70548f84
authorEvan Czaplicki <evancz@users.noreply.github.com>
dateTue 4 Jun 2019, 11:37 (7 years ago)
parentfcb0c36
builder/src/Reporting.hs+6−2
@@ -78,7 +78,9 @@ attempt :: (x -> Help.Report) -> IO (Either x a) -> IO a
7878attempt toReport work =
7979 do result <- work `catch` reportExceptionsNicely
8080 case result of
81− Right a -> return a
81+ Right a ->
82+ return a
83+
8284 Left x ->
8385 do Exit.toStderr (toReport x)
8486 Exit.exitFailure
@@ -88,7 +90,9 @@ attemptWithStyle :: Style -> (x -> Help.Report) -> IO (Either x a) -> IO a
8890attemptWithStyle style toReport work =
8991 do result <- work `catch` reportExceptionsNicely
9092 case result of
91− Right a -> return a
93+ Right a ->
94+ return a
95+
9296 Left x ->
9397 case style of
9498 Silent ->