diff options
| -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 |