@@ -168,6 +168,7 @@ performBuild' pb@PerformBuild {..} = withBuildDir $ \builddir -> do
168168 $ \ClosedStream Inherited Inherited -> return ()
169169 pbLog $ encodeUtf8 "Copying built-in Haddocks\n"
170170 copyBuiltInHaddocks (pbDocDir pb)
171+ pbLog $ encodeUtf8 "Finished copying built-in Haddocks\n"
171172
172173 sem <- atomically $ newTSem pbJobs
173174 active <- newTVarIO (0 :: Int)
@@ -288,7 +289,7 @@ singleBuild pb@PerformBuild {..} SingleBuild {..} =
288289 log' t = do
289290 i <- readTVarIO sbActive
290291 errs <- readTVarIO sbErrsVar
291− pbLog $ encodeUtf8 $ concat
292+ when False $ pbLog $ encodeUtf8 $ concat
292293 [ t
293294 , " (pending: "
294295 , tshow i
@@ -367,7 +368,6 @@ singleBuild pb@PerformBuild {..} SingleBuild {..} =
367368 args = "haddock"
368369 : "--hyperlink-source"
369370 : "--html"
370− : "--hoogle"
371371 : "--html-location=../$pkg-$version/"
372372 : hfsOpts
373373
@@ -416,12 +416,15 @@ singleBuild pb@PerformBuild {..} SingleBuild {..} =
416416 warn t = atomically $ modifyTVar sbWarningsVar (. (t:))
417417
418418 updateErrs exc = do
419− log' $ concat
420− [ display (piName sbPackageInfo)
421− , ": "
422− , tshow exc
423− ]
424− atomically $ modifyTVar sbErrsVar $ insertMap (piName sbPackageInfo) exc'
419+ case exc' of
420+ DependencyFailed _ -> return ()
421+ _ -> do
422+ log' $ concat
423+ [ display (piName sbPackageInfo)
424+ , ": "
425+ , tshow exc
426+ ]
427+ atomically $ modifyTVar sbErrsVar $ insertMap (piName sbPackageInfo) exc'
425428 where
426429 exc' =
427430 case fromException exc of