Fix excessive-free-point-style lint errors on Rank.hs

Summary: Just replace `.` with `$`, also tweaked the spacing a bit for skimmability

Reviewed By: chessai

Differential Revision: D28411898

fbshipit-source-id: d18b9ef5db99b82d150231080c89f812f709f409
This commit is contained in:
Steven Troxler 2021-05-13 11:06:11 -07:00 committed by Facebook GitHub Bot
parent 3eafced0fa
commit d6587dafbb

View File

@ -57,9 +57,10 @@ rank
-> [ResolvedToken]
-> [ResolvedToken]
rank classifiers targets tokens =
Set.toList . Set.fromList
. map (\(Candidate token _ _) -> token)
. winners
Set.toList
$ Set.fromList
$ map (\(Candidate token _ _) -> token)
$ winners
$ map makeCandidate tokens
where
makeCandidate :: ResolvedToken -> Candidate