diff options
| author | Mark Lentczner <markl@glyphic.com> | 2010-07-19 05:35:55 +0000 |
|---|---|---|
| committer | Mark Lentczner <markl@glyphic.com> | 2010-07-19 05:35:55 +0000 |
| commit | dc977adf518ee91892b31846d6a25984c0aa3155 (patch) | |
| tree | 1cf0be27c049dda25d21912eb9099d87c4b5571a | |
| parent | d3ebf5f25ead73877b38302cbe8b1ed13e993917 (diff) | |
remove an explicit bold tag - replace with .def class
| -rw-r--r-- | html/shaddock.css | 4 | ||||
| -rw-r--r-- | html/xhaddock.css | 4 | ||||
| -rw-r--r-- | src/Haddock/Backends/Xhtml/Names.hs | 3 |
3 files changed, 10 insertions, 1 deletions
diff --git a/html/shaddock.css b/html/shaddock.css index 7928c832..82c8bfef 100644 --- a/html/shaddock.css +++ b/html/shaddock.css @@ -115,6 +115,10 @@ tt, pre, code { white-space: nowrap; } +.def { + font-weight: bold; +} + ul { padding: 0; } diff --git a/html/xhaddock.css b/html/xhaddock.css index 695acc43..ee493d51 100644 --- a/html/xhaddock.css +++ b/html/xhaddock.css @@ -76,6 +76,10 @@ pre { margin-top: 0; } +.def { + font-weight: bold; +} + ul.links { list-style: none; text-align: left; 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 |