diff options
| author | Niklas Haas <git@nand.wakku.to> | 2014-03-09 07:43:39 +0100 |
|---|---|---|
| committer | Niklas Haas <git@nand.wakku.to> | 2014-03-09 07:43:39 +0100 |
| commit | 843c42c4179526a2ad3526e4c7d38cbf4d50001d (patch) | |
| tree | e1af3ee8de1a336144134a7b04180231ecd2c9fc /src/Haddock/Backends/Xhtml/Layout.hs | |
| parent | 17970e6b6aa22962c498ce02ead8dbadad31a733 (diff) | |
Reorder topDeclElem to move the source/wiki links to the top
They appear in the same position due to the float: right attribute but
now they're always at the top of the box instead of at the bottom.
Diffstat (limited to 'src/Haddock/Backends/Xhtml/Layout.hs')
| -rw-r--r-- | src/Haddock/Backends/Xhtml/Layout.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/Backends/Xhtml/Layout.hs b/src/Haddock/Backends/Xhtml/Layout.hs index dbc043be..9a0e461d 100644 --- a/src/Haddock/Backends/Xhtml/Layout.hs +++ b/src/Haddock/Backends/Xhtml/Layout.hs @@ -192,7 +192,7 @@ declElem = paragraph ! [theclass "src"] -- it adds a source and wiki link at the right hand side of the box topDeclElem :: LinksInfo -> SrcSpan -> [DocName] -> Html -> Html topDeclElem ((_,_,sourceMap), (_,_,maybe_wiki_url)) loc names html = - declElem << (html <+> srcLink <+> wikiLink) + declElem << (srcLink <+> wikiLink <+> html) where srcLink = case Map.lookup origPkg sourceMap of Nothing -> noHtml |