From dc977adf518ee91892b31846d6a25984c0aa3155 Mon Sep 17 00:00:00 2001 From: Mark Lentczner Date: Mon, 19 Jul 2010 05:35:55 +0000 Subject: remove an explicit bold tag - replace with .def class --- src/Haddock/Backends/Xhtml/Names.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/Haddock') 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 -- cgit v1.2.3