Drop erronous traces

Author: angerman

Cabal/src/Distribution/Simple/InstallDirs.hs

@@ -209,7 +209,7 @@ defaultInstallDirs' False comp userInstall _hasLibs = do
     case buildOS of
       Windows -> return "$prefix"
       _ -> return ("$prefix" </> "lib")
-  return $ traceShowId $
+  return $
     fmap toPathTemplate $
       InstallDirs
         { prefix = installPrefix
@@ -267,7 +267,7 @@ substituteInstallDirTemplates
   :: PathTemplateEnv
   -> InstallDirTemplates
   -> InstallDirTemplates
-substituteInstallDirTemplates env dirs = traceShow "BOOM" $ dirs'
+substituteInstallDirTemplates env dirs = dirs'
   where
     dirs' =
       InstallDirs

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

@@ -214,7 +214,7 @@ rebuildTargetsDryRun distDirLayout@DistDirLayout{..} shared =
         BuildInplaceOnly{} -> do
           -- TODO: [nice to have] use a proper file monitor rather
           -- than this dir exists test
-          exists <- doesDirectoryExist (traceShowId srcdir)
+          exists <- doesDirectoryExist srcdir
           if exists
             then dryRunLocalPkg pkg depsBuildStatus srcdir
             else return (BuildStatusUnpack tarball)