@@ -1812,6 +1812,7 @@ theoremEnvironment name = do
1814italicize :: Block -> Block
1814italicize :: Block -> Block
1815+italicize x@(Para [Image{}]) = x -- see #6925
1815italicize (Para ils) = Para [Emph ils]
1816italicize (Para ils) = Para [Emph ils]
1816italicize (Plain ils) = Plain [Emph ils]
1817italicize (Plain ils) = Plain [Emph ils]
1817italicize x = x
1818italicize x = x