diff options
| author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-03-05 19:02:49 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-03-05 19:02:49 +0100 |
| commit | 7ae56f7d4b15fa3ea1f48ca2c79f1064bddc6af5 (patch) | |
| tree | b45fa8e968816f4f289a9d2ff59ca4652edd910e /src/Text | |
| parent | 65b1a9cf00ef8c2f895416ee5ad5f299d05be9b8 (diff) | |
| download | hakyll-7ae56f7d4b15fa3ea1f48ca2c79f1064bddc6af5.tar.gz | |
Fixed bug with tag rendering.
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Hakyll/Tags.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Hakyll/Tags.hs b/src/Text/Hakyll/Tags.hs index a8f1db6..3d43abc 100644 --- a/src/Text/Hakyll/Tags.hs +++ b/src/Text/Hakyll/Tags.hs @@ -110,7 +110,7 @@ readCategoryMap = readMap $ maybeToList . M.lookup "category" withTagMap :: RenderAction () TagMap -> (String -> [Renderable] -> Hakyll ()) -> Hakyll () -withTagMap tagMap function = runRenderActionIfNeeded (tagMap >>> action) +withTagMap tagMap function = runRenderAction (tagMap >>> action) where action = createRenderAction (mapM_ (uncurry function) . M.toList) |