Fix spelling mistake ("exception has occurred")
commit0180efd20ca732641985d5b454f343ca4335cc97
authorBit Connor <bitc@users.noreply.github.com>
dateSun 11 Aug 2019, 14:51 (7 years ago)
parent737e10b
katip/src/Katip/Core.hs+1−1
@@ -1012,7 +1012,7 @@ logException
10121012logException a ns sev action = action `catchAny` \e -> f e >> throwM e
10131013 where
10141014 f e = logF a ns sev (msg e)
1015− msg e = ls (T.pack "An exception has occured: ") <> showLS e
1015+ msg e = ls (T.pack "An exception has occurred: ") <> showLS e
10161016
10171017
10181018-------------------------------------------------------------------------------
katip/src/Katip/Monadic.hs+1−1
@@ -315,7 +315,7 @@ logExceptionM
315315logExceptionM action sev = action `catchAny` \e -> f e >> throwM e
316316 where
317317 f e = logFM sev (msg e)
318− msg e = ls ("An exception has occured: " :: Text) Semi.<> showLS e
318+ msg e = ls ("An exception has occurred: " :: Text) Semi.<> showLS e
319319
320320
321321-------------------------------------------------------------------------------