diff options
| author | Miguel <m.i@gmx.at> | 2019-03-09 20:32:52 +0100 |
|---|---|---|
| committer | Miguel <m.i@gmx.at> | 2019-03-09 20:32:52 +0100 |
| commit | 93ad7601b933bf872b3db9e78c5f4bd47f26f6c6 (patch) | |
| tree | 1ed0187b90a346f16b21a2a7c887d5baa88b52c1 /src/WWWStaticusPlugins.hs | |
| parent | f8c022e7eb8953372d1e734d713ce2400ca3cb92 (diff) | |
enabled pandoc emoji extension
Diffstat (limited to 'src/WWWStaticusPlugins.hs')
| -rw-r--r-- | src/WWWStaticusPlugins.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/WWWStaticusPlugins.hs b/src/WWWStaticusPlugins.hs index 9451d05..608e052 100644 --- a/src/WWWStaticusPlugins.hs +++ b/src/WWWStaticusPlugins.hs @@ -152,7 +152,7 @@ staticusPluginCfg = StaticusPlugin "extract config lines" run return -- |pipes 'index.md' value through pandoc and saves in 'content' staticusPluginPandoc::StaticusPlugin staticusPluginPandoc = StaticusPlugin "pandoc" run return - where run m = let f = runPure $ do doc <- readMarkdown def{readerExtensions=(enableExtension Ext_raw_html pandocExtensions )} $ T.pack (par "index.md" m) + where run m = let f = runPure $ do doc <- readMarkdown def{readerExtensions=(pandocExtensions`mappend`(extensionsFromList [Ext_emoji,Ext_raw_html]) )} $ T.pack (par "index.md" m) writeHtml5String def doc in M.union (M.fromList [("content",T.unpack (fromRight (T.pack "err") f))]) m |