Rename field to dupesImports

Author: philderbeast

cabal-install/src/Distribution/Client/ProjectConfig/Legacy.hs

@@ -266,20 +266,20 @@ parseProject rootPath cacheDir httpTransport verbosity configToParse = do
 
 data Dupes = Dupes
   { dupesImport :: ProjectImport
-  , dupesSeenImportsBy :: [ProjectImport]
+  , dupesImports :: [ProjectImport]
   }
   deriving (Eq)
 
 instance Ord Dupes where
-  compare = compare `on` length . dupesSeenImportsBy
+  compare = compare `on` length . dupesImports
 
 type DupesMap = Map FilePath [Dupes]
 
 dupesMsg :: (FilePath, [Dupes]) -> Doc
 dupesMsg (duplicate, ds@(take 1 . sortOn (importBy . dupesImport) -> dupes)) =
   vcat $
     ((text "Warning:" <+> int (length ds) <+> text "imports of" <+> text duplicate) <> semi)
-      : ((\Dupes{..} -> duplicateImportMsg Disp.empty dupesImport dupesSeenImportsBy) <$> dupes)
+      : ((\Dupes{..} -> duplicateImportMsg Disp.empty dupesImport dupesImports) <$> dupes)
 
 parseProjectSkeleton
   :: FilePath