@@ -77,7 +77,7 @@ main = do
7777 . Map.delete "som" -- TODO: https://github.com/NixOS/cabal2nix/issues/164
7878 . Map.delete "type" -- TODO: https://github.com/NixOS/cabal2nix/issues/163
7979 . Map.delete "control-invariants" -- TODO: depends on "assert"
80− . over (at ("hermes")) ((fmap (set (contains "1.3.4.3") False))) -- TODO: https://github.com/haskell/hackage-server/issues/436
80+ . over (at "hermes") (fmap (set (contains "1.3.4.3") False)) -- TODO: https://github.com/haskell/hackage-server/issues/436
8181 hackage <- fixup <$> readHackage hackageRepository
8282 let
8383 hackagePackagesFile :: FilePath
@@ -133,7 +133,7 @@ main = do
133133 meta <- readPackageMeta hackageRepository pkgId
134134
135135 let isInDefaultPackageSet :: Bool
136− isInDefaultPackageSet = maybe False (== v) (Map.lookup name generatedDefaultPackageSet)
136+ isInDefaultPackageSet = (== Just v) (Map.lookup name generatedDefaultPackageSet)
137137
138138 tarballSHA256 :: SHA256Hash
139139 tarballSHA256 = fromMaybe (error (display pkgId ++ ": meta data has no hash for the tarball"))
@@ -155,7 +155,7 @@ main = do
155155 & metaSection.homepage .~ ""
156156
157157 overrides :: Doc
158− overrides = fcat $ punctuate space [ disp b <> semi | b <- Set.toList ((view (dependencies . each) drv) `Set.union` view extraFunctionArgs drv), not (isFromHackage b) ]
158+ overrides = fcat $ punctuate space [ disp b <> semi | b <- Set.toList (view (dependencies . each) drv `Set.union` view extraFunctionArgs drv), not (isFromHackage b) ]
159159 return $ render $ nest 2 $
160160 hang (doubleQuotes (text attr) <+> equals <+> text "callPackage") 2 (parens (pPrint drv)) <+> (braces overrides <> semi)
161161