diff --git a/src/Stackage/Database/Query.hs b/src/Stackage/Database/Query.hs index 24127a2..ec99900 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 ^. SnapshotCreated)] + orderBy [desc (versionArray v), desc (s ^. SnapshotId)] limit 1 pure ((), spiQ))