diff options
| author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2008-02-09 03:19:43 +0000 |
|---|---|---|
| committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2008-02-09 03:19:43 +0000 |
| commit | 614547b38eff096d5bcdd1fc97eadc8eab89028a (patch) | |
| tree | eff9841eb7ec72bae9fb54cdf53fd292a42479c5 /Text/Pandoc/Readers/HTML.hs | |
| parent | 705340824d1523262f2c32e9821b1f035937bec8 (diff) | |
| download | pandoc-614547b38eff096d5bcdd1fc97eadc8eab89028a.tar.gz | |
Use generic attributes type, not a string, for CodeBlocks.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1209 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'Text/Pandoc/Readers/HTML.hs')
| -rw-r--r-- | Text/Pandoc/Readers/HTML.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Text/Pandoc/Readers/HTML.hs b/Text/Pandoc/Readers/HTML.hs index 2528de7b7..359ff3021 100644 --- a/Text/Pandoc/Readers/HTML.hs +++ b/Text/Pandoc/Readers/HTML.hs @@ -407,7 +407,7 @@ codeBlock = try $ do let result''' = if "\n" `isSuffixOf` result'' then init result'' else result'' - return $ CodeBlock "" $ decodeCharacterReferences result''' + return $ CodeBlock ("",[],[]) $ decodeCharacterReferences result''' -- -- block quotes |