So we will inherit default values for any new flags that get added,
so things should not break if new flags are added.
doit :: FilePath -> FilePath -> Verbosity -> IO ()
doit pref ghcpkg verbosity =
do let userHooks = simpleUserHooks
- copyFlags = CopyFlags {
+ copyFlags = emptyCopyFlags {
copyDest = NoCopyDest,
copyVerbose = verbosity
}
- registerFlags = RegisterFlags {
+ registerFlags = emptyRegisterFlags {
regUser = MaybeUserGlobal,
- regGenScript = False,
- regInPlace = False,
- regWithHcPkg = Just ghcpkg,
regVerbose = verbosity
}
lbi <- getPersistBuildConfig