From de8c1b525294b9f80a9fb4deb3c736139c5a9b8e Mon Sep 17 00:00:00 2001 From: Sean D Gillespie Date: Fri, 5 Sep 2025 14:29:21 -0400 Subject: [PATCH] Fix incomplete-record-selection warning in cabal-install There's already a total `repoName` that returns `remoteRepoName` for remote repos. Resolves: #11208 --- cabal-install/src/Distribution/Client/ProjectPlanning.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/cabal-install/src/Distribution/Client/ProjectPlanning.hs b/cabal-install/src/Distribution/Client/ProjectPlanning.hs index 0cd1c5377fd..685e46dfa77 100644 --- a/cabal-install/src/Distribution/Client/ProjectPlanning.hs +++ b/cabal-install/src/Distribution/Client/ProjectPlanning.hs @@ -1246,8 +1246,8 @@ getPackageSourceHashes verbosity withRepoCtx solverPlan = do ] | (repo, pkgids) <- map (\grp@((repo, _) :| _) -> (repo, map snd (NE.toList grp))) - . NE.groupBy ((==) `on` (remoteRepoName . repoRemote . fst)) - . sortBy (compare `on` (remoteRepoName . repoRemote . fst)) + . NE.groupBy ((==) `on` (repoName . fst)) + . sortBy (compare `on` (repoName . fst)) $ repoTarballPkgsWithMetadata ]