From 7dfa2e2ea8ce314152b495919fe8c3a41b5f737a Mon Sep 17 00:00:00 2001
From: Daniel Gröber <dxld@darkboxed.org>
Date: Sun, 2 Dec 2018 20:18:06 +0100
Subject: Fix wrong target-selector syntax for v2-build

---
 src/CabalHelper/Compiletime/Program/CabalInstall.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/CabalHelper/Compiletime/Program/CabalInstall.hs b/src/CabalHelper/Compiletime/Program/CabalInstall.hs
index 637d577..afc3f1a 100644
--- a/src/CabalHelper/Compiletime/Program/CabalInstall.hs
+++ b/src/CabalHelper/Compiletime/Program/CabalInstall.hs
@@ -198,9 +198,11 @@ planUnits plan = do
       , uDistDir=Just distdirv1
       , uPkgSrc=Just (CP.LocalUnpackedPackage pkgdir)
       , uComps=comps
+      , uPId=CP.PkgId pkg_name _
       } = do
         cabal_file <- Cabal.findCabalFile pkgdir
-        let uiV2Components = map (Text.unpack . CP.dispCompName) $ Map.keys comps
+        let uiV2Components =
+              map (Text.unpack . CP.dispCompNameTarget pkg_name) $ Map.keys comps
         return $ Just $ Right $ Unit
           { uUnitId     = UnitId $ Text.unpack (coerce (CP.uId u))
           , uPackageDir = pkgdir
-- 
cgit v1.2.3