aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock/Backends
diff options
context:
space:
mode:
authorMark Lentczner <markl@glyphic.com>2010-07-19 05:35:55 +0000
committerMark Lentczner <markl@glyphic.com>2010-07-19 05:35:55 +0000
commitdc977adf518ee91892b31846d6a25984c0aa3155 (patch)
tree1cf0be27c049dda25d21912eb9099d87c4b5571a /src/Haddock/Backends
parentd3ebf5f25ead73877b38302cbe8b1ed13e993917 (diff)
remove an explicit bold tag - replace with .def class
Diffstat (limited to 'src/Haddock/Backends')
-rw-r--r--src/Haddock/Backends/Xhtml/Names.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Haddock/Backends/Xhtml/Names.hs b/src/Haddock/Backends/Xhtml/Names.hs
index b124d42b..59ac2a3e 100644
--- a/src/Haddock/Backends/Xhtml/Names.hs
+++ b/src/Haddock/Backends/Xhtml/Names.hs
@@ -51,7 +51,8 @@ ppBinder :: Bool -> OccName -> Html
-- The Bool indicates whether we are generating the summary, in which case
-- the binder will be a link to the full definition.
ppBinder True n = linkedAnchor (nameAnchorId n) << ppBinder' n
-ppBinder False n = namedAnchor (nameAnchorId n) << bold << ppBinder' n
+ppBinder False n = namedAnchor (nameAnchorId n) ! [theclass "def"]
+ << ppBinder' n
ppBinder' :: OccName -> Html