Skip to content

Commit

Permalink
Merge pull request #441 from chreekat/undo-mtl-hack
Browse files Browse the repository at this point in the history
Undo mtl hack
  • Loading branch information
ndmitchell authored Feb 9, 2025
2 parents 8149c93 + b8b20d5 commit ee6f155
Showing 1 changed file with 0 additions and 3 deletions.
3 changes: 0 additions & 3 deletions src/Action/Generate.hs
Original file line number Diff line number Diff line change
Expand Up @@ -249,9 +249,6 @@ actionGenerate g@Generate{..} = withTiming (if debug then Just $ replaceExtensio
cbl <- evaluate $ Map.map (\p -> p{packageDepends=[]}) cbl -- clear the memory, since the information is no longer used
evaluate popularity

-- mtl is more popular than transformers, despite having dodgy docs, which is a shame, so we hack it
popularity <- evaluate $ Map.adjust (max $ 1 + Map.findWithDefault 0 (strPack "mtl") popularity) (strPack "transformers") popularity

want <- pure $ if include /= [] then Set.fromList $ map strPack include else want
want <- pure $ case count of Nothing -> want; Just count -> Set.fromList $ take count $ Set.toList want

Expand Down

0 comments on commit ee6f155

Please sign in to comment.