diff options
Diffstat (limited to 'Biz/Bild.hs')
| -rw-r--r-- | Biz/Bild.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Biz/Bild.hs b/Biz/Bild.hs index 9da11ac..39d8aaf 100644 --- a/Biz/Bild.hs +++ b/Biz/Bild.hs @@ -159,11 +159,11 @@ main = Cli.main <| Cli.Plan help move test pure move :: Cli.Arguments -> IO () move args = IO.hSetBuffering stdout IO.NoBuffering - >> mapM getNamespace (Cli.getAllArgs args (Cli.argument "target")) + >> traverse getNamespace (Cli.getAllArgs args (Cli.argument "target")) /> catMaybes /> filter isBuildableNs - +> mapM analyze - +> mapM + +> traverse analyze + +> traverse ( build (args `Cli.has` Cli.longOption "test") (args `Cli.has` Cli.longOption "loud") |