From f8aa5bc4de45260101b1e08c34d740a04609170c Mon Sep 17 00:00:00 2001 From: Michael Snoyman Date: Tue, 5 Jun 2018 13:40:23 -0600 Subject: [PATCH] Error out on no packages --- src/Stackage/Database/Cron.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/Stackage/Database/Cron.hs b/src/Stackage/Database/Cron.hs index 03d32a7..1bcd11b 100644 --- a/src/Stackage/Database/Cron.hs +++ b/src/Stackage/Database/Cron.hs @@ -164,6 +164,8 @@ createHoogleDB db man name = handleAny (\e -> print e $> Nothing) $ do $ sourceTarFile False tarFP $$ foldMapMC (liftIO . singleDB db name tmpdir) + when (null allPackagePairs) $ error $ "No Hoogle .txt files found for " ++ unpack (toPathPiece name) + stackDir <- getAppUserDataDirectory "stack" let indexTar = stackDir "indices" "Hackage" "00-index.tar" withBinaryFile indexTar ReadMode $ \h -> do