Start9/registry
2
0
Fork 0
mirror of https://github.com/Start9Labs/registry.git synced 2026-03-30 03:41:57 +00:00
Code Issues Packages Projects Releases Wiki Activity

rework to normalize version in db and small cleanups

Browse Source
This commit is contained in:
Lucy Cifferello
2020-06-22 12:47:28 -06:00
parent d33cd382af
commit d27972bee1
11 changed files with 92 additions and 86 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/Lib/Semver.hs
View File

@@ -43,4 +43,4 @@ instance HasAppVersion AppVersion where
appVersionMax :: HasAppVersion a => [a] -> Maybe a
appVersionMax [] = Nothing
appVersionMax as = Just $ maximumBy (\a1 a2 -> version a1 `compare` version a2) as
appVersionMax as = Just $ maximumBy (compare `on` version) as