From 78b019a9156696984179eca3fe90d427230b9d51 Mon Sep 17 00:00:00 2001
From: Alexey Kuleshevich <alexey@kuleshevi.ch>
Date: Wed, 26 Jun 2019 12:21:01 +0300
Subject: [PATCH] Fix missing "Latest on Hackage" for packages from
 global-hints

---
 src/Stackage/Database/Query.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/Stackage/Database/Query.hs b/src/Stackage/Database/Query.hs
index e7fdc66..759f101 100644
--- a/src/Stackage/Database/Query.hs
+++ b/src/Stackage/Database/Query.hs
@@ -440,10 +440,8 @@ getSnapshotPackagePageInfo ::
        GetStackageDatabase env m => SnapshotPackageInfo -> Int -> m SnapshotPackagePageInfo
 getSnapshotPackagePageInfo spi maxDisplayedDeps =
     run $ do
-        mhciLatest <-
-            case spiOrigin spi of
-                Hackage -> getHackageLatestVersion $ spiPackageName spi
-                _       -> pure Nothing
+        mhciLatest <- getHackageLatestVersion $ spiPackageName spi
+        -- TODO: check for `spiOrigin spi` once other than `Hackage` are implemented
         forwardDepsCount <- getForwardDepsCount spi
         reverseDepsCount <- getReverseDepsCount spi
         forwardDeps <-