@@ -26,7 +26,8 @@ import Text.DocLayout
2626 ( Doc, braces, cr, empty, hcat, hsep, isEmpty, literal, nest
2727 , text, vcat, ($$) )
2828import Text.Pandoc.Shared (blocksToInlines, splitBy, tshow)
29−import Text.Pandoc.Walk (walk)
29+import Text.Pandoc.Walk (walk, query)
30+import Data.Monoid (Any(..))
3031import Text.Pandoc.Writers.LaTeX.Caption (getCaption)
3132import Text.Pandoc.Writers.LaTeX.Notes (notesToLaTeX)
3233import Text.Pandoc.Writers.LaTeX.Types
@@ -261,8 +262,12 @@ cellToLaTeX blockListToLaTeX celltype annotatedCell = do
261262 Para{} -> True
262263 Plain{} -> True
263264 _ -> False
265+ let hasLineBreak LineBreak = Any True
266+ hasLineBreak _ = Any False
264267 result <-
265− if not hasWidths || (celltype /= HeaderCell && all isPlainOrPara blocks)
268+ if not hasWidths || (celltype /= HeaderCell
269+ && all isPlainOrPara blocks
270+ && not (getAny (query hasLineBreak blocks)))
266271 then
267272 blockListToLaTeX $ walk fixLineBreaks $ walk displayMathToInline blocks
268273 else do