@@ -69,12 +69,6 @@ readCabalFile name vers = do
69 ParseFailed err -> fail ("cannot parse cabal file " ++ cabal ++ ": " ++ show err)
69 ParseFailed err -> fail ("cannot parse cabal file " ++ cabal ++ ": " ++ show err)
70 return pkg
70 return pkg
72−badPackages :: [String]
78discoverNixFiles :: (FilePath -> Hackage4Nix ()) -> FilePath -> Hackage4Nix ()
72discoverNixFiles :: (FilePath -> Hackage4Nix ()) -> FilePath -> Hackage4Nix ()
79discoverNixFiles yield dirOrFile
73discoverNixFiles yield dirOrFile
80 | "." `isPrefixOf` takeFileName dirOrFile = msgDebug $ "ignore file or directory " ++ dirOrFile
74 | "." `isPrefixOf` takeFileName dirOrFile = msgDebug $ "ignore file or directory " ++ dirOrFile
@@ -243,3 +237,53 @@ main = bracket (return ()) (\() -> hFlush stdout >> hFlush stderr) $ \() -> do
243 , _hackageDb = last $ _hackageDb defaultConfiguration : [ p | HackageDB p <- opts ]
237 , _hackageDb = last $ _hackageDb defaultConfiguration : [ p | HackageDB p <- opts ]
245 flip evalStateT cfg (updateNixPkgs args)
239 flip evalStateT cfg (updateNixPkgs args)
243+-- Packages that we cannot regenerate automatically yet. This list
246+badPackages :: [String]
248+ [ "haskell-platform"
259+ , "gtk2hs-buildtools"