Run stylish-haskell on all files
This commit is contained in:
parent
ff9b7a35c7
commit
52da9f0507
1 changed files with 1 additions and 1 deletions
|
|
@ -54,7 +54,7 @@ protect m = do
|
||||||
result <- liftIO $ tryIOError m
|
result <- liftIO $ tryIOError m
|
||||||
case result of
|
case result of
|
||||||
Right a -> pure a
|
Right a -> pure a
|
||||||
Left e -> throw $ T.pack $ show e
|
Left e -> throw $ T.pack $ show e
|
||||||
|
|
||||||
readFileT :: FilePath -> Run T.Text
|
readFileT :: FilePath -> Run T.Text
|
||||||
readFileT = protect . T.readFile
|
readFileT = protect . T.readFile
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue