Commit 5239f89c authored by Edward Z. Yang's avatar Edward Z. Yang
Browse files

Make register print the IPI when verbose (useful!)

Also, unconditionally pass -v to cabal in package-tests.
Signed-off-by: default avatarEdward Z. Yang <>
parent ca93c471
......@@ -103,6 +103,8 @@ registerOne pkg lbi regFlags lib
verbosity pkg lib lbi clbi inplace reloc distPref
(registrationPackageDB absPackageDBs)
info verbosity (IPI.showInstalledPackageInfo installedPkgInfo)
when (fromFlag (regPrintId regFlags)) $ do
putStrLn (display (IPI.installedUnitId installedPkgInfo))
......@@ -313,12 +313,10 @@ cabal' cmd extraArgs0 = do
then packageDBParams (packageDBStack suite)
else [])
++ extraArgs0
-- This gives us MUCH better error messages
"build" -> "-v" : extraArgs0
_ -> extraArgs0
-- This is a horrible hack to make hpc work correctly
dist_dir <- relativeDistDir
let extraArgs = ["--distdir", dist_dir] ++ extraArgs1
let extraArgs = ["-v", "--distdir", dist_dir] ++ extraArgs1
doCabal (cmd:extraArgs)
-- | This abstracts the common pattern of configuring and then building.
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment