diff options
| -rw-r--r-- | lib/Hakyll/Web/Tags.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/Hakyll/Web/Tags.hs b/lib/Hakyll/Web/Tags.hs index 43f6c4f..aab5d34 100644 --- a/lib/Hakyll/Web/Tags.hs +++ b/lib/Hakyll/Web/Tags.hs @@ -326,8 +326,10 @@ categoryField = -- | Render one tag link simpleRenderLink :: String -> (Maybe FilePath) -> Maybe H.Html simpleRenderLink _ Nothing = Nothing -simpleRenderLink tag (Just filePath) = - Just $ H.a ! A.href (toValue $ toUrl filePath) $ toHtml tag +simpleRenderLink tag (Just filePath) = Just $ + H.a ! A.title (H.stringValue ("All pages tagged '"++tag++"'.")) + ! A.href (toValue $ toUrl filePath) + $ toHtml tag -------------------------------------------------------------------------------- |