getLocatedImportsRule: "Simplify" some bogus logic

Author: sjakobi

ghcide/src/Development/IDE/Core/Rules.hs

@@ -328,8 +328,7 @@ getLocatedImportsRule recorder =
                     return $ if itExists then Just nfp' else Nothing
                 | Just tt <- HM.lookup (TargetModule modName) targets = do
                     -- reuse the existing NormalizedFilePath in order to maximize sharing
-                    let ttmap = HM.mapWithKey const (HashSet.toMap tt)
-                        nfp' = HM.lookupDefault nfp nfp ttmap
+                    let nfp' = nfp
                     itExists <- getFileExists nfp'
                     return $ if itExists then Just nfp' else Nothing
                 | otherwise = do

ghcide/src/Development/IDE/Types/KnownTargets.hs

@@ -21,7 +21,7 @@ import           GHC.Generics
 -- | A mapping of module name to known files
 data KnownTargets = KnownTargets
   { targetMap      :: !(HashMap Target (HashSet NormalizedFilePath))
-  -- | 'normalisingMap' is a cached copy of `HMap.mapKey const targetMap`
+  -- | 'normalisingMap' is a cached copy of `HMap.mapWithKey const targetMap`
   --
   -- At startup 'GetLocatedImports' is called on all known files. Say you have 10000
   -- modules in your project then this leads to 10000 calls to 'GetLocatedImports'