diff options
| -rw-r--r-- | src/Text/Hakyll/Internal/Page.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Hakyll/Internal/Page.hs b/src/Text/Hakyll/Internal/Page.hs index c91d7ae..657ea77 100644 --- a/src/Text/Hakyll/Internal/Page.hs +++ b/src/Text/Hakyll/Internal/Page.hs @@ -98,7 +98,8 @@ readPageFromFile path = do url <- toUrl path let sections = splitAtDelimiters $ lines contents sectionsData = concat $ zipWith ($) sectionFunctions sections - context = M.fromList $ ("url", url) : category ++ sectionsData + context = M.fromList $ + ("url", url) : ("path", path) : category ++ sectionsData return context where |