diff --git a/src/Stackage/Database/Query.hs b/src/Stackage/Database/Query.hs index ec99900..df7d7e8 100644 --- a/src/Stackage/Database/Query.hs +++ b/src/Stackage/Database/Query.hs @@ -606,7 +606,7 @@ getSnapshotPackageLatestVersionQuery pname = fmap snd . listToMaybe <$> (snapshotPackageInfoQuery $ \_sp s pn v spiQ -> do where_ (pn ^. PackageNameName ==. val pname) - orderBy [desc (versionArray v), desc (s ^. SnapshotId)] + orderBy [desc (s ^. SnapshotId)] limit 1 pure ((), spiQ))