diff --git a/src/Stackage/Database/Cron.hs b/src/Stackage/Database/Cron.hs
index 866ccd0..4e231ad 100644
--- a/src/Stackage/Database/Cron.hs
+++ b/src/Stackage/Database/Cron.hs
@@ -137,6 +137,7 @@ newHoogleLocker env man bucketUrl = mkSingleRun hoogleLocker
                                     return Nothing
                                 | otherwise -> do
                                     body <- liftIO $ brConsume $ responseBody res
+                                    logWarn $ "Unexpected status: " <> displayShow status
                                     mapM_ (logWarn . displayBytesUtf8) body
                                     return Nothing