Fix missing "Latest on Hackage" for packages from global-hints

This commit is contained in:
Alexey Kuleshevich 2019-06-26 12:21:01 +03:00
parent d9a285a87f
commit 78b019a915
No known key found for this signature in database
GPG Key ID: E59B216127119E3E

View File

@ -440,10 +440,8 @@ getSnapshotPackagePageInfo ::
GetStackageDatabase env m => SnapshotPackageInfo -> Int -> m SnapshotPackagePageInfo GetStackageDatabase env m => SnapshotPackageInfo -> Int -> m SnapshotPackagePageInfo
getSnapshotPackagePageInfo spi maxDisplayedDeps = getSnapshotPackagePageInfo spi maxDisplayedDeps =
run $ do run $ do
mhciLatest <- mhciLatest <- getHackageLatestVersion $ spiPackageName spi
case spiOrigin spi of -- TODO: check for `spiOrigin spi` once other than `Hackage` are implemented
Hackage -> getHackageLatestVersion $ spiPackageName spi
_ -> pure Nothing
forwardDepsCount <- getForwardDepsCount spi forwardDepsCount <- getForwardDepsCount spi
reverseDepsCount <- getReverseDepsCount spi reverseDepsCount <- getReverseDepsCount spi
forwardDeps <- forwardDeps <-