summaryrefslogtreecommitdiff
path: root/src/Hakyll
diff options
context:
space:
mode:
Diffstat (limited to 'src/Hakyll')
-rw-r--r--src/Hakyll/Web/Tags.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Web/Tags.hs b/src/Hakyll/Web/Tags.hs
index 62a99fc..9c3d114 100644
--- a/src/Hakyll/Web/Tags.hs
+++ b/src/Hakyll/Web/Tags.hs
@@ -116,7 +116,7 @@ renderTagCloud urlFunction minSize maxSize (Tags tags) = renderHtml $
in show (size' :: Int) ++ "%"
-- Find out the relative count of a tag: on a scale from 0 to 1
- relative count = (fromIntegral count - minCount) / (maxCount - minCount)
+ relative count = (fromIntegral count - minCount) / (1 + maxCount - minCount)
-- The minimum and maximum count found, as doubles
(minCount, maxCount)