feat: easily separate renderables by blank lines

1 files changed, 3 insertions, 3 deletions

diff --git a/app/Main.hs b/app/Main.hs
index da4ea6a..46f6e77 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -573,10 +573,10 @@ main = do
         map (if detailed then (P.render . P.Detailed) else (P.render . P.Summarized)) issues
     Options {colorize, noPager, width, command = Log {patch}} -> do
       es <- reverse . (.issueEvents) <$> getHistory
-      putDoc colorize noPager width . P.vsep $
+      putDoc colorize noPager width $
         if patch
-          then map (P.render . P.Detailed) es
-          else map (P.render . P.Summarized) es
+          then P.vsep . intersperse P.emptyDoc $ map (P.render . P.Detailed) es
+          else P.vsep $ map (P.render . P.Summarized) es
     Options {colorize, noPager, width, command = Show {id, edit}} -> do
       issues <- (.issues) <$> getHistory
       issue <-