[commit: haddock] master: Fixes #271 (764a6b8)

[git at git.haskell.org]

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

On branch  : master
Link       : http://git.haskell.org/haddock.git/commitdiff/764a6b85b686dee3d93e130bd650ee33a985aca2

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

commit 764a6b85b686dee3d93e130bd650ee33a985aca2
Author: Mateusz Kowalczyk <fuuzetsu at fuuzetsu.co.uk>
Date:   Mon Jan 13 02:16:54 2014 +0000

    Fixes #271
    
    Signed-off-by: Austin Seipp <austin at well-typed.com>


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

764a6b85b686dee3d93e130bd650ee33a985aca2
 CHANGES                       |    2 ++
 src/Haddock/Backends/Xhtml.hs |    2 +-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/CHANGES b/CHANGES
index 3e7e8a2..8793c58 100644
--- a/CHANGES
+++ b/CHANGES
@@ -25,6 +25,8 @@ Changes in version 2.14.0
  * {-# OPTIONS_HADDOCK show-extensions #-} pragma will show the GHC extensions
    enabled in the module.
 
+ * Properly render License field (#271)
+
 Changes in version 2.13.2
 
  * Handle HsExplicitListTy in renamer (#213)
diff --git a/src/Haddock/Backends/Xhtml.hs b/src/Haddock/Backends/Xhtml.hs
index 1b6d7fe..d61478a 100644
--- a/src/Haddock/Backends/Xhtml.hs
+++ b/src/Haddock/Backends/Xhtml.hs
@@ -203,7 +203,7 @@ moduleInfo iface =
       entries :: [HtmlTable]
       entries = mapMaybe doOneEntry [
           ("Copyright",hmi_copyright),
-          ("License",hmi_copyright),
+          ("License",hmi_license),
           ("Maintainer",hmi_maintainer),
           ("Stability",hmi_stability),
           ("Portability",hmi_portability),