+-- Get the build info, merging the setup-config and buildinfo files.
+getConfig :: Verbosity -> IO LocalBuildInfo
+getConfig verbosity = do
+ lbi <- getPersistBuildConfig
+ maybe_infoFile <- defaultHookedPackageDesc
+ case maybe_infoFile of
+ Nothing -> return lbi
+ Just infoFile -> do
+ hbi <- readHookedBuildInfo verbosity infoFile
+ return lbi { localPkgDescr = updatePackageDescription hbi (localPkgDescr lbi)}
+
+