diff options
| author |  Alexander Foremny <aforemny@posteo.de> | 2023-10-02 23:08:07 +0200 |
|---|---|---|
| committer | Alexander Foremny <aforemny@posteo.de> | 2023-10-02 23:08:07 +0200 |
| commit | 3ae98347e7ad3e410974c4f6bac1ccaf56daa280 (patch) | |
| tree | 351ddd895ef550d51c3d7934ee514a9ae0cc824b | |
| parent | 39db0eceae0091032a9f71d5a56c9d81faa2054b (diff) | |
don't show full bodies in list
| -rw-r--r-- | app/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/app/Main.hs b/app/Main.hs index 126caab..50ac0fd 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -126,7 +126,7 @@ showMatches treeGrepperResult = listMatches :: TreeGrepperResult -> IO () listMatches treeGrepperResult = - mapM_ (putStrLn . (.text)) $ treeGrepperResult.matches + mapM_ (putStrLn . unlines . take 1 . lines . (.text)) $ treeGrepperResult.matches data UnknownFileExtension = UnknownFileExtension { extension :: String |