RST writer: Allow soft breaks w continuations in line blocks.

This commit is contained in:
John MacFarlane 2013-01-13 11:15:51 -08:00
parent 5c067bb457
commit a2c93c5a33

View file

@ -156,7 +156,7 @@ blockToRST (Para [Image txt (src,tit)]) = do
blockToRST (Para inlines)
| LineBreak `elem` inlines = do -- use line block if LineBreaks
lns <- mapM inlineListToRST $ splitBy (==LineBreak) inlines
return $ (nowrap $ vcat $ map (text "| " <>) lns) <> blankline
return $ (vcat $ map (text "| " <>) lns) <> blankline
| otherwise = do
contents <- inlineListToRST inlines
return $ contents <> blankline