From 95d7eefe1f29f440d216c9a7ebd0560f2de4a9f6 Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Mon, 22 Oct 2012 14:37:41 +0900 Subject: Allow date as field for renderDateField --- tests/Hakyll/Web/Page/Metadata/Tests.hs | 3 +++ 1 file changed, 3 insertions(+) (limited to 'tests') diff --git a/tests/Hakyll/Web/Page/Metadata/Tests.hs b/tests/Hakyll/Web/Page/Metadata/Tests.hs index e3ceed9..badb9fb 100644 --- a/tests/Hakyll/Web/Page/Metadata/Tests.hs +++ b/tests/Hakyll/Web/Page/Metadata/Tests.hs @@ -54,6 +54,9 @@ tests = concat $ [ ("path", "/posts/2010-01-31-a-post.mkdwn") , ("published", "February 20, 2000 1:00 PM") ] + , (@=?) "October 22, 2012" $ getField "date" $ renderDateField + "date" "%B %e, %Y" "Date unknown" $ Page + (M.singleton "date" "2012-10-22 14:35:24") "" ] , fromAssertions "copyBodyToField" -- cgit v1.2.3