diff --git a/src/Stackage/Database/Cron.hs b/src/Stackage/Database/Cron.hs index dfe6ef7..ecb909a 100644 --- a/src/Stackage/Database/Cron.hs +++ b/src/Stackage/Database/Cron.hs @@ -716,7 +716,9 @@ buildAndUploadHoogleDB doNotUpload = do void $ checkInsertSnapshotHoogleDb True snapshotId Nothing -> do logInfo $ "Current hoogle database does not yet exist for: " <> display snapName - mfp' <- createHoogleDB snapshotId snapName + mfp' <- createHoogleDB snapshotId snapName `catchAny` \e -> do + logError $ displayShow e + pure Nothing forM_ mfp' $ \fp -> do let key = hoogleKey snapName dest = T.unpack key