From 3d426e1e9deb6c18fdbfb351491c80e5a1dac9eb Mon Sep 17 00:00:00 2001 From: Alexey Kuleshevich Date: Wed, 26 Jun 2019 14:06:48 +0300 Subject: [PATCH] Fix the query for selecting the newest package version. Related to 07f3ef293fb557efcc7db1b5b552203d59ad8be7 --- src/Stackage/Database/Query.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Stackage/Database/Query.hs b/src/Stackage/Database/Query.hs index 759f101..364655b 100644 --- a/src/Stackage/Database/Query.hs +++ b/src/Stackage/Database/Query.hs @@ -552,7 +552,7 @@ getSnapshotPackageLatestVersion pname = run (snapshotPackageInfoQuery $ \_sp s pn v spiQ -> do where_ (pn ^. PackageNameName ==. val pname) orderBy - [ desc (stringToArray (v ^. VersionVersion) (val ("." :: String))) + [ desc (versionArray v) , desc (s ^. SnapshotCreated) ] limit 1