summaryrefslogtreecommitdiff
path: root/src/Text/Hakyll/Page.hs
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2010-01-24 11:55:40 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2010-01-24 11:55:40 +0100
commit788a37cd3ea28e890c3f6f4ffca087e580dafcbd (patch)
tree965b092d4555a972e3d6ac92de8b69cea18754d3 /src/Text/Hakyll/Page.hs
parent4295de01bc524b5dccb17dfe2e50f2121feeea07 (diff)
downloadhakyll-788a37cd3ea28e890c3f6f4ffca087e580dafcbd.tar.gz
Use ascending list for serializing where possible.
Diffstat (limited to 'src/Text/Hakyll/Page.hs')
-rw-r--r--src/Text/Hakyll/Page.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Hakyll/Page.hs b/src/Text/Hakyll/Page.hs
index b9507b6..0cf86ee 100644
--- a/src/Text/Hakyll/Page.hs
+++ b/src/Text/Hakyll/Page.hs
@@ -149,5 +149,5 @@ instance Renderable Page where
-- Make pages serializable.
instance Binary Page where
- put (Page context) = put $ M.toList context
- get = liftM (Page . M.fromList) get
+ put (Page context) = put $ M.toAscList context
+ get = liftM (Page . M.fromAscList) get