aboutsummaryrefslogtreecommitdiffstats
path: root/app
diff options
context:
space:
mode:
authorLibravatar Alexander Foremny <aforemny@posteo.de>2023-10-02 23:08:07 +0200
committerLibravatar Alexander Foremny <aforemny@posteo.de>2023-10-02 23:08:07 +0200
commit3ae98347e7ad3e410974c4f6bac1ccaf56daa280 (patch)
tree351ddd895ef550d51c3d7934ee514a9ae0cc824b /app
parent39db0eceae0091032a9f71d5a56c9d81faa2054b (diff)
don't show full bodies in list
Diffstat (limited to 'app')
-rw-r--r--app/Main.hs2
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