Put language class information in pre tag, not code tag, in HTML code blocks.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@1207 788f1e2b-df1e-0410-8736-df70ead52e1b
This commit is contained in:
fiddlosopher 2008-02-09 03:19:24 +00:00
parent 2e683e8b53
commit f2354590f9

View file

@ -263,9 +263,9 @@ blockToHtml opts (Plain lst) = inlineListToHtml opts lst
blockToHtml opts (Para lst) = inlineListToHtml opts lst >>= (return . paragraph)
blockToHtml opts (RawHtml str) = return $ primHtml str
blockToHtml opts (HorizontalRule) = return $ hr
blockToHtml opts (CodeBlock lang str) = return $ pre $
thecode ! (if null lang then [] else [theclass lang]) << (str ++ "\n")
-- the final \n for consistency with Markdown.pl
blockToHtml opts (CodeBlock lang str) = return $
pre ! (if null lang then [] else [theclass lang]) $
thecode << (str ++ "\n") -- the final \n for consistency with Markdown.pl
blockToHtml opts (BlockQuote blocks) =
-- in S5, treat list in blockquote specially
-- if default is incremental, make it nonincremental;