src, nix: hlint update

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
+1 -1
View File
@@ -455,7 +455,7 @@ findProc qi argumentsKeys paramsAsSingleObject allProcs contentType isInvPost =
matchProc = overloadedProcPartition $ HM.lookupDefault mempty qi allProcs -- first find the proc by name
-- The partition obtained has the form (overloadedProcs,fallbackProcs)
-- where fallbackProcs are functions with a single unnamed parameter
overloadedProcPartition procs = foldr select ([],[]) procs
overloadedProcPartition = foldr select ([],[])
select proc ~(ts,fs)
| matchesParams proc = (proc:ts,fs)
| hasSingleUnnamedParam proc = (ts,proc:fs)
+1 -1
View File
@@ -359,7 +359,7 @@ callRequest proc apiReq readReq = FunctionCall {
| ppName prm == mempty -> OnePosParam prm
| otherwise -> KeyParams $ specifiedParams [prm]
prms -> KeyParams $ specifiedParams prms
specifiedParams params = filter (\x -> ppName x `S.member` iColumns apiReq) params
specifiedParams = filter (\x -> ppName x `S.member` iColumns apiReq)
returningCols :: ReadRequest -> [FieldName] -> [FieldName]
returningCols rr@(Node _ forest) pkCols