diff options
author | Albert Krewinkel <albert@zeitkraut.de> | 2021-05-20 10:48:28 +0200 |
---|---|---|
committer | Albert Krewinkel <albert@zeitkraut.de> | 2021-05-20 12:48:05 +0200 |
commit | b6239f41509c368b5befd316c290b5b6cc6f00e3 (patch) | |
tree | a5511ebb11723dea201babc04db32f2e97242aa6 /src/Text/Pandoc/Writers | |
parent | 5736b331d8ecaa12cc3e2712211ada37c665a93a (diff) | |
download | pandoc-b6239f41509c368b5befd316c290b5b6cc6f00e3.tar.gz |
ZimWiki writer: allow links and emphasis in headers
The latest version of ZimWiki supports this.
Closes: #6605
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r-- | src/Text/Pandoc/Writers/ZimWiki.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/ZimWiki.hs b/src/Text/Pandoc/Writers/ZimWiki.hs index fcf9e000d..df914f590 100644 --- a/src/Text/Pandoc/Writers/ZimWiki.hs +++ b/src/Text/Pandoc/Writers/ZimWiki.hs @@ -116,7 +116,7 @@ blockToZimWiki opts b@(RawBlock f str) blockToZimWiki _ HorizontalRule = return "\n----\n" blockToZimWiki opts (Header level _ inlines) = do - contents <- inlineListToZimWiki opts $ removeFormatting inlines -- emphasis, links etc. not allowed in headers + contents <- inlineListToZimWiki opts inlines let eqs = T.replicate ( 7 - level ) "=" return $ eqs <> " " <> contents <> " " <> eqs <> "\n" |