[commit: haddock] wip/ast-annotations-separate: Make IEModuleContents have Located ModuleName (b31be07)

[git at git.haskell.org]

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

On branch  : wip/ast-annotations-separate
Link       : http://git.haskell.org/haddock.git/commitdiff/b31be07d250cd006d0654efe2e16f82274c9acb6

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

commit b31be07d250cd006d0654efe2e16f82274c9acb6
Author: Alan Zimmerman <alan.zimm at gmail.com>
Date:   Tue Oct 28 22:52:33 2014 +0200

    Make IEModuleContents have Located ModuleName


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

b31be07d250cd006d0654efe2e16f82274c9acb6
 src/Haddock/Interface/Create.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Haddock/Interface/Create.hs b/src/Haddock/Interface/Create.hs
index 8b39280..653da6d 100644
--- a/src/Haddock/Interface/Create.hs
+++ b/src/Haddock/Interface/Create.hs
@@ -494,7 +494,7 @@ mkExportItems
     lookupExport (IEThingAbs t)          = declWith t
     lookupExport (IEThingAll (L _ t))    = declWith t
     lookupExport (IEThingWith (L _ t) _) = declWith t
-    lookupExport (IEModuleContents m)  =
+    lookupExport (IEModuleContents (L _ m))  =
       moduleExports thisMod m dflags warnings gre exportedNames decls modMap instIfaceMap maps fixMap splices
     lookupExport (IEGroup lev docStr)  = return $
       return . ExportGroup lev "" $ processDocString dflags gre docStr