diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2011-10-17 11:31:19 +0200 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2011-10-17 11:31:19 +0200 |
| commit | 7161567379fcab8e7b01170547c54429dc2df28a (patch) | |
| tree | 57ec7f662d2ef49ba12f664e7e0645f5580e8720 /src/Hakyll | |
| parent | c6a98c37ddfbfb8228d0500a2587d1c61c4b022b (diff) | |
| download | hakyll-7161567379fcab8e7b01170547c54429dc2df28a.tar.gz | |
Fix spacing in tag list
Diffstat (limited to 'src/Hakyll')
| -rw-r--r-- | src/Hakyll/Web/Tags.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Web/Tags.hs b/src/Hakyll/Web/Tags.hs index c8e45c9..a5d4a9e 100644 --- a/src/Hakyll/Web/Tags.hs +++ b/src/Hakyll/Web/Tags.hs @@ -170,7 +170,7 @@ renderTagList :: (String -> Identifier (Page a)) -> Compiler (Tags a) (String) renderTagList makeUrl = renderTags makeUrl makeLink (intercalate ", ") where makeLink tag url count _ _ = renderHtml $ - H.a ! A.href (toValue url) $ toHtml (tag ++ "(" ++ show count ++ ")") + H.a ! A.href (toValue url) $ toHtml (tag ++ " (" ++ show count ++ ")") -- | Render tags with links -- |