diff --git a/src/Split.hs b/src/Split.hs
index 8cb41ed97..a60953ad2 100644
--- a/src/Split.hs
+++ b/src/Split.hs
@@ -68,7 +68,7 @@ data Row = Row Line Line
   deriving (Show, Eq)
 
 instance ToMarkup Row where
-  toMarkup (Row left right) = (tr $ toMarkup left <> toMarkup right)
+  toMarkup (Row left right) = (tr $ toMarkup left <> toMarkup right) <> string "\n"
 
 instance ToMarkup Line where
   toMarkup EmptyLine = td (string "")