Refactor getPackageSourceHashes in cabal-install

There's already a total `repoName` function that avoids
incomplete-record-selectors. In the case of RepoSecure, it returns the
`remoteRepoName`.

Author: sgillespie

cabal-install/src/Distribution/Client/ProjectPlanning.hs

@@ -1245,11 +1245,9 @@ getPackageSourceHashes verbosity withRepoCtx solverPlan = do
                       | pkgid <- pkgids
                       ]
                 | (repo, pkgids) <-
-                    -- All Repos here are SecureRepos (and will have a name), so we're
-                    -- sorting Justs
                     map (\grp@((repo, _) :| _) -> (repo, map snd (NE.toList grp)))
-                      . NE.groupBy ((==) `on` (fmap remoteRepoName . maybeRepoRemote . fst))
-                      . sortBy (compare `on` (fmap remoteRepoName . maybeRepoRemote . fst))
+                      . NE.groupBy ((==) `on` (repoName . fst))
+                      . sortBy (compare `on` (repoName . fst))
                       $ repoTarballPkgsWithMetadata
                 ]