From c33a0b2ef062ac19692a4b836d28d16b49aab995 Mon Sep 17 00:00:00 2001 From: Mathieu Boespflug Date: Mon, 20 May 2013 11:56:28 +0200 Subject: Output Copright and License keys in Xhtml backend. This information is as relevant in the documentation as it is in the source files themselves. Signed-off-by: David Waern --- src/Haddock/Backends/Xhtml.hs | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'src/Haddock/Backends') diff --git a/src/Haddock/Backends/Xhtml.hs b/src/Haddock/Backends/Xhtml.hs index fde2da69..96aea5e5 100644 --- a/src/Haddock/Backends/Xhtml.hs +++ b/src/Haddock/Backends/Xhtml.hs @@ -200,11 +200,13 @@ moduleInfo iface = entries :: [HtmlTable] entries = mapMaybe doOneEntry [ - ("Portability",hmi_portability), - ("Stability",hmi_stability), - ("Maintainer",hmi_maintainer), - ("Safe Haskell",hmi_safety) - ] + ("Copyright",hmi_copyright), + ("License",hmi_copyright), + ("Maintainer",hmi_maintainer), + ("Stability",hmi_stability), + ("Portability",hmi_portability), + ("Safe Haskell",hmi_safety) + ] in case entries of [] -> noHtml -- cgit v1.2.3