jimmy/postgrest
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

src, nix: hlint update

Browse Source 
This pulls in an updated hlint version from nixpkgs, and fixes some
new eta-reduction warnings. (I don't particularly think this is more
readable, but I suppose being consistently hlint-clean is worth it.)
This commit is contained in:
Robert Vollmert
2022-06-14 19:13:55 +02:00
committed by Robert
parent bac63f339d
commit 36ed7e2fb7
5 changed files with 7 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/PostgREST/Admin.hs
+2 -2
View File
@@ -60,8 +60,8 @@ reachMainApp AppConfig{..} =
"*6" -> ipv6Addrs xs ++ ipv4Addrs xs
"!6" -> ipv6Addrs xs
_ -> xs
ipv4Addrs xs = filter ((/=) AF_INET6 . addrFamily) xs
ipv6Addrs xs = filter ((==) AF_INET6 . addrFamily) xs
ipv4Addrs = filter ((/=) AF_INET6 . addrFamily)
ipv6Addrs = filter ((==) AF_INET6 . addrFamily)
addrs <- getAddrInfo (Just $ defaultHints { addrSocketType = Stream }) (T.unpack <$> host) (Just . show $ configServerPort)
tryAddr `traverse` filterAddrs addrs