diff options
| author | Ben Sima <ben@bsima.me> | 2022-03-30 14:33:32 -0400 |
|---|---|---|
| committer | Ben Sima <ben@bsima.me> | 2022-03-30 14:33:32 -0400 |
| commit | b0c707e6f1fc03280ab45e34bec199740469e539 (patch) | |
| tree | 583d7b6ee8edeecf856ba2200d5896575bd34391 /Biz/Bild.hs | |
| parent | 377acdcc31e244153da7a4ef9af0638a6d496a1e (diff) | |
Add isCab function
Diffstat (limited to 'Biz/Bild.hs')
| -rw-r--r-- | Biz/Bild.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Biz/Bild.hs b/Biz/Bild.hs index 7df1fae..43be7b0 100644 --- a/Biz/Bild.hs +++ b/Biz/Bild.hs @@ -151,7 +151,7 @@ move :: Cli.Arguments -> IO () move args = IO.hSetBuffering stdout IO.NoBuffering >> pure (Cli.getAllArgs args (Cli.argument "target")) - /> filter (not <. ("_" `List.isPrefixOf`)) + /> filter (not <. Namespace.isCab) +> filterM Dir.doesFileExist +> traverse (\fn -> analyze fn /> (fn,)) /> filter (snd .> isJust) |