[commit: haddock] master: Revert "Reorder topDeclElem to move the source/wiki links to the top" (5f02bd6)

git at git.haskell.org git at git.haskell.org
Tue Mar 11 09:49:16 UTC 2014


Repository : ssh://git@git.haskell.org/haddock

On branch  : master
Link       : http://git.haskell.org/haddock.git/commitdiff/5f02bd67b9a17feb2dc64dc5f5c011996850fb8a

>---------------------------------------------------------------

commit 5f02bd67b9a17feb2dc64dc5f5c011996850fb8a
Author: Niklas Haas <git at nand.wakku.to>
Date:   Tue Mar 11 10:36:55 2014 +0100

    Revert "Reorder topDeclElem to move the source/wiki links to the top"
    
    This reverts commit 843c42c4179526a2ad3526e4c7d38cbf4d50001d.
    
    This change is no longer needed with the new rendering style, and it
    messes with copy/pasting lines.


>---------------------------------------------------------------

5f02bd67b9a17feb2dc64dc5f5c011996850fb8a
 src/Haddock/Backends/Xhtml/Layout.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Haddock/Backends/Xhtml/Layout.hs b/src/Haddock/Backends/Xhtml/Layout.hs
index dfcda47..6784fb3 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 -> Bool -> [DocName] -> Html -> Html
 topDeclElem ((_,_,sourceMap,lineMap), (_,_,maybe_wiki_url)) loc splice names html =
-    declElem << (srcLink <+> wikiLink <+> html)
+    declElem << (html <+> srcLink <+> wikiLink)
   where srcLink = let nameUrl = Map.lookup origPkg sourceMap
                       lineUrl = Map.lookup origPkg lineMap
                       mUrl | splice    = lineUrl



More information about the ghc-commits mailing list