Avoid name shadowing

haddock-api/src/Haddock/Backends/Xhtml.hs

@@ -32,7 +32,8 @@ import Haddock.Types
 import Haddock.Version
 import Haddock.Utils
 import Haddock.Utils.Json
-import Text.XHtml hiding ( title, p, quote )
+import Text.XHtml hiding ( name, title, p, quote )
+import qualified Text.XHtml as XHtml
 import Haddock.GhcUtils
 
 import Control.Monad         ( when, unless )
@@ -122,7 +123,7 @@ headHtml :: String -> Themes -> Maybe String -> Html
 headHtml docTitle themes mathjax_url =
   header << [
     meta ! [ httpequiv "Content-Type", content "text/html; charset=UTF-8"],
-    meta ! [ name "viewport", content "width=device-width, initial-scale=1"],
+    meta ! [ XHtml.name "viewport", content "width=device-width, initial-scale=1"],
     thetitle << docTitle,
     styleSheet themes,
     thelink ! [ rel "stylesheet", thetype "text/css", href quickJumpCssFile] << noHtml,