@@ -557,7 +557,7 @@ isBlockElement (Elem e) = qName (elName e) `elem` blocktags
557557 "important","caution","note","tip","warning","qandadiv",
558558 "question","answer","abstract","itemizedlist","orderedlist",
559559 "variablelist","article","book","table","informaltable",
560− "screen","programlisting"]
560+ "screen","programlisting","example"]
561561isBlockElement _ = False
562562
563563-- Trim leading and trailing newline characters