diff options
| author | Bergi <a.d.bergi@web.de> | 2018-03-20 12:57:58 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2018-03-20 07:57:58 -0400 |
| commit | c28428fd8c61cfd21adba5b5fbefc0f8a1784da8 (patch) | |
| tree | 35b65d133801b4e6fed8effd2286628d16f8a6ee /tests/Hakyll | |
| parent | 9a23bfb129ca799cdeb9e893dcc82afbff742fb3 (diff) | |
| download | hakyll-c28428fd8c61cfd21adba5b5fbefc0f8a1784da8.tar.gz | |
Make Pandoc dependency optional
Diffstat (limited to 'tests/Hakyll')
| -rw-r--r-- | tests/Hakyll/Core/Rules/Tests.hs | 3 | ||||
| -rw-r--r-- | tests/Hakyll/Core/Runtime/Tests.hs | 2 | ||||
| -rw-r--r-- | tests/Hakyll/Web/Template/Tests.hs | 5 |
3 files changed, 5 insertions, 5 deletions
diff --git a/tests/Hakyll/Core/Rules/Tests.hs b/tests/Hakyll/Core/Rules/Tests.hs index c4c0f28..24b5b8c 100644 --- a/tests/Hakyll/Core/Rules/Tests.hs +++ b/tests/Hakyll/Core/Rules/Tests.hs @@ -17,7 +17,6 @@ import Hakyll.Core.Metadata import Hakyll.Core.Routes import Hakyll.Core.Rules import Hakyll.Core.Rules.Internal -import Hakyll.Web.Pandoc import System.FilePath ((</>)) import Test.Tasty (TestTree, testGroup) import Test.Tasty.HUnit (Assertion, (@=?)) @@ -75,7 +74,7 @@ rules01 ioref = do -- Compile some posts match "*.md" $ do route $ setExtension "html" - compile pandocCompiler + compile copyFileCompiler -- Yeah. I don't know how else to test this stuff? preprocess $ writeIORef ioref True diff --git a/tests/Hakyll/Core/Runtime/Tests.hs b/tests/Hakyll/Core/Runtime/Tests.hs index 5f27854..9c23162 100644 --- a/tests/Hakyll/Core/Runtime/Tests.hs +++ b/tests/Hakyll/Core/Runtime/Tests.hs @@ -39,7 +39,7 @@ case01 = do compile $ do getResourceBody >>= saveSnapshot "raw" - >>= renderPandoc + >>= renderParagraphs match (fromList ["partial.html", "partial-helper.html"]) $ compile templateCompiler diff --git a/tests/Hakyll/Web/Template/Tests.hs b/tests/Hakyll/Web/Template/Tests.hs index 054a9bd..b63a0dd 100644 --- a/tests/Hakyll/Web/Template/Tests.hs +++ b/tests/Hakyll/Web/Template/Tests.hs @@ -16,7 +16,6 @@ import Hakyll.Core.Compiler import Hakyll.Core.Identifier import Hakyll.Core.Item import Hakyll.Core.Provider -import Hakyll.Web.Pandoc import Hakyll.Web.Template import Hakyll.Web.Template.Context import Hakyll.Web.Template.Internal @@ -89,7 +88,9 @@ test (outf, tplf, itemf) = do out <- resourceString provider outf tpl <- testCompilerDone store provider tplf templateBodyCompiler item <- testCompilerDone store provider itemf $ - pandocCompiler >>= applyTemplate (itemBody tpl) testContext + getResourceBody + >>= renderParagraphs + >>= applyTemplate (itemBody tpl) testContext out @=? itemBody item cleanTestEnv |