summaryrefslogtreecommitdiff
path: root/src/Text/Hakyll/Internal
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Hakyll/Internal')
-rw-r--r--src/Text/Hakyll/Internal/Page.hs3
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