@@ -82,13 +82,11 @@ main = bracket (return ()) (\() -> hFlush stdout >> hFlush stderr) $ \() -> do
83 sha <- if null hash then hashPackage packageId else return (head hash)
83 sha <- if null hash then hashPackage packageId else return (head hash)
85− let deriv = (cabal2nix cabal)
85+ let deriv = (cabal2nix cabal) { sha256 = sha, runHaddock = not noHaddock }
87− , runHaddock = not noHaddock
88− , metaSection = (metaSection deriv)
86+ deriv' = deriv { metaSection = (metaSection deriv)
89− { maintainers = maints
87+ { maintainers = maints
90− , platforms = plats
88+ , platforms = plats
94− putStr (show (disp deriv))
92+ putStr (display deriv')