mirror of
https://github.com/github/semantic.git
synced 2024-12-18 12:21:57 +03:00
add newline to the end of Row toMarkup
This commit is contained in:
parent
c67ff8f2e5
commit
dc456afc65
@ -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 "")
|
||||
|
Loading…
Reference in New Issue
Block a user