diff options
| author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2010-02-27 03:57:11 +0000 |
|---|---|---|
| committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2010-02-27 03:57:11 +0000 |
| commit | 9089e5488054f42441c77c286224dc63081f0e8c (patch) | |
| tree | 45c146f2d26e1af4e70ac13c974c1209c5cea6b3 /src | |
| parent | 432b7b23907e1f3974581e85276fdacb1a8899e2 (diff) | |
Promoted mediawiki headers.
= head = is now level 1, == head == level 2, etc.
This seems to be correct; it's only by convention that
wikipedia articles have level 2 headers at most.
Patch due to Eric Kow.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1849 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Writers/MediaWiki.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/MediaWiki.hs b/src/Text/Pandoc/Writers/MediaWiki.hs index 572308820..bde5cc9e1 100644 --- a/src/Text/Pandoc/Writers/MediaWiki.hs +++ b/src/Text/Pandoc/Writers/MediaWiki.hs @@ -96,7 +96,7 @@ blockToMediaWiki _ HorizontalRule = return "\n-----\n" blockToMediaWiki opts (Header level inlines) = do contents <- inlineListToMediaWiki opts inlines - let eqs = replicate (level + 1) '=' + let eqs = replicate level '=' return $ eqs ++ " " ++ contents ++ " " ++ eqs ++ "\n" blockToMediaWiki _ (CodeBlock (_,classes,_) str) = do |