Use emptyRegisterFlags and emptyCopyFlags for reduced fragility

So we will inherit default values for any new flags that get added,
so things should not break if new flags are added.

diff --git a/libraries/installPackage.hs b/libraries/installPackage.hs
index 060ba79..3d190d6 100644 (file)
--- a/libraries/installPackage.hs
+++ b/libraries/installPackage.hs
@@ -26,15 +26,12 @@ main = do args <- getArgs
 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