mirror of
https://github.com/Avi-D-coder/implicit-hie.git
synced 2024-11-26 11:25:24 +03:00
Don't generate trailing spaces
This commit is contained in:
parent
07bd89709f
commit
62e4f18708
@ -50,7 +50,6 @@ cradle:
|
||||
- path: "metametapost/src/Cli.hs"
|
||||
component: "metametapost:exe:metametapost-optics"
|
||||
|
||||
|
||||
```
|
||||
|
||||
## Features
|
||||
|
@ -18,7 +18,14 @@ hieYaml sOrC pkgs =
|
||||
(sOrC <> ":\n" <> indent' pkgs)
|
||||
|
||||
indent' :: String -> String
|
||||
indent' = unlines . map (" " <>) . lines
|
||||
indent' =
|
||||
unlines
|
||||
. map
|
||||
( \l -> case l of
|
||||
"" -> ""
|
||||
_ -> " " <> l
|
||||
)
|
||||
. lines
|
||||
|
||||
cabalComponent :: Name -> Component -> (FilePath, String)
|
||||
cabalComponent n (Comp Lib "" p) = (T.unpack p, T.unpack $ "lib:" <> n)
|
||||
|
Loading…
Reference in New Issue
Block a user