mirror of
https://github.com/Avi-D-coder/implicit-hie.git
synced 2024-11-22 01:30:49 +03:00
Ormolu formatted.
This commit is contained in:
parent
c6ecccdefd
commit
0c336ba826
10
app/Main.hs
10
app/Main.hs
@ -35,9 +35,13 @@ resolveName pwd = do
|
||||
files <- listDirectory pwd
|
||||
when ("--help" `elem` args || "-h" `elem` args) $ do
|
||||
progName <- getProgName
|
||||
hPutStrLn stderr $ "Usage: " <> progName <> " [ --cabal | --stack ]\n\n\
|
||||
\If neither argument is given then " <> progName <> " will infer the type by\n\
|
||||
\looking for dist-newstyle, .stack-work, cabal.project and stack.yaml in that order."
|
||||
hPutStrLn stderr $
|
||||
"Usage: " <> progName
|
||||
<> " [ --cabal | --stack ]\n\n\
|
||||
\If neither argument is given then "
|
||||
<> progName
|
||||
<> " will infer the type by\n\
|
||||
\looking for dist-newstyle, .stack-work, cabal.project and stack.yaml in that order."
|
||||
exitSuccess
|
||||
let fileNames = map takeFileName files
|
||||
name =
|
||||
|
Loading…
Reference in New Issue
Block a user