summaryrefslogtreecommitdiff
path: root/tests/Hakyll/Web
diff options
context:
space:
mode:
authorsamgd <sam@samgd.com>2016-07-24 15:10:12 +0200
committersamgd <sam@samgd.com>2016-07-24 15:10:12 +0200
commitca7b78ee428a43bb307ecefb65529d5106751192 (patch)
tree4032212187c1768216e1010c1087147fa04e37f3 /tests/Hakyll/Web
parenta04f722eb1cd426f5285d7ab32e8670efd542446 (diff)
downloadhakyll-ca7b78ee428a43bb307ecefb65529d5106751192.tar.gz
Working trimming but module loop and formatting req.
Diffstat (limited to 'tests/Hakyll/Web')
-rw-r--r--tests/Hakyll/Web/Template/Tests.hs16
1 files changed, 8 insertions, 8 deletions
diff --git a/tests/Hakyll/Web/Template/Tests.hs b/tests/Hakyll/Web/Template/Tests.hs
index a7b31a7..087e0cb 100644
--- a/tests/Hakyll/Web/Template/Tests.hs
+++ b/tests/Hakyll/Web/Template/Tests.hs
@@ -41,30 +41,30 @@ tests = testGroup "Hakyll.Core.Template.Tests" $ concat
-- 'If' trim check.
, Template
[ TrimL
- , TrimR
, If (Ident (TemplateKey "body"))
- (Template [ Chunk "\n"
+ (Template [ TrimR
+ , Chunk "\n"
, Expr (Ident (TemplateKey "body"))
, Chunk "\n"
+ , TrimL
])
- (Just (Template [ TrimL
- , TrimR
+ (Just (Template [ TrimR
, Chunk "\n"
, Expr (Ident (TemplateKey "body"))
, Chunk "\n"
+ , TrimL
]))
- , TrimL
, TrimR
]
@=? readTemplate "$-if(body)-$\n$body$\n$-else-$\n$body$\n$-endif-$"
-- 'For' trim check.
, Template
[ TrimL
- , TrimR
, For (Ident (TemplateKey "authors"))
- (Template [Chunk "\n body \n"])
+ (Template [ TrimR
+ , Chunk "\n body \n"
+ , TrimL])
Nothing
- , TrimL
, TrimR
]
@=? readTemplate "$-for(authors)-$\n body \n$-endfor-$"