@@ -419,6 +419,7 @@ blockToMarkdown' :: PandocMonad m
419419blockToMarkdown' _ Null = return empty
420420blockToMarkdown' opts (Div attrs ils) = do
421421 contents <- blockListToMarkdown opts ils
422+ variant <- asks envVariant
422423 return $
423424 case () of
424425 _ | isEnabled Ext_fenced_divs opts &&
@@ -428,7 +429,8 @@ blockToMarkdown' opts (Div attrs ils) = do
428429 literal ":::" <> blankline
429430 | isEnabled Ext_native_divs opts ||
430431 (isEnabled Ext_raw_html opts &&
431− isEnabled Ext_markdown_in_html_blocks opts) ->
432+ (variant == Commonmark ||
433+ isEnabled Ext_markdown_in_html_blocks opts)) ->
432434 tagWithAttrs "div" attrs <> blankline <>
433435 contents <> blankline <> "</div>" <> blankline
434436 | isEnabled Ext_raw_html opts &&