diff --git a/src/Handler/Hoogle.hs b/src/Handler/Hoogle.hs
index 9dd60bb..fd3cc92 100644
--- a/src/Handler/Hoogle.hs
+++ b/src/Handler/Hoogle.hs
@@ -23,7 +23,12 @@ getHoogleDB name = track "Handler.Hoogle.getHoogleDB" do
     liftIO $ appGetHoogleDB app name
 
 getHoogleR :: SnapName -> Handler Html
-getHoogleR name = track "Handler.Hoogle.getHoogleR" do
+getHoogleR name0 = track "Handler.Hoogle.getHoogleR" do
+    let branch =
+          case name0 of
+            SNLts _ _ -> LtsBranch
+            SNNightly _ -> NightlyBranch
+    name <- newestSnapshot branch >>= maybe notFound return
     Entity _ snapshot <- lookupSnapshot name >>= maybe notFound return
     mquery <- lookupGetParam "q"
     mPackageName <- lookupGetParam "package"
diff --git a/src/Stackage/Database/Cron.hs b/src/Stackage/Database/Cron.hs
index dfe6ef7..c4cf221 100644
--- a/src/Stackage/Database/Cron.hs
+++ b/src/Stackage/Database/Cron.hs
@@ -229,6 +229,7 @@ runStackageUpdate doNotUpload = do
         runConduit $ sourceSnapshots .| foldMC (createOrUpdateSnapshot corePackageGetters) (pure ())
     unless doNotUpload uploadSnapshotsJSON
     buildAndUploadHoogleDB doNotUpload
+    logInfo "Finished building and uploading Hoogle DBs"
     run $ mapM_ (`rawExecute` []) ["TRUNCATE TABLE latest_version", "COMMIT", "VACUUM", "BEGIN"]