summaryrefslogtreecommitdiff
path: root/Setup.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Setup.hs')
-rw-r--r--Setup.hs11
1 files changed, 5 insertions, 6 deletions
diff --git a/Setup.hs b/Setup.hs
index 0a187bd95..470a0d3db 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -16,15 +16,14 @@ import System.Directory
import qualified Build.DesktopFile as DesktopFile
import qualified Build.Configure as Configure
+main :: IO ()
main = defaultMainWithHooks simpleUserHooks
- { preConf = configure
+ { preConf = \_ _ -> do
+ Configure.run Configure.tests
+ return (Nothing, [])
, postInst = myPostInst
}
-configure _ _ = do
- Configure.run Configure.tests
- return (Nothing, [])
-
myPostInst :: Args -> InstallFlags -> PackageDescription -> LocalBuildInfo -> IO ()
myPostInst _ (InstallFlags { installVerbosity }) pkg lbi = do
installGitAnnexShell dest verbosity pkg lbi
@@ -57,7 +56,7 @@ installManpages copyDest verbosity pkg lbi =
manpages = ["git-annex.1", "git-annex-shell.1"]
installDesktopFile :: CopyDest -> Verbosity -> PackageDescription -> LocalBuildInfo -> IO ()
-installDesktopFile copyDest verbosity pkg lbi =
+installDesktopFile copyDest _verbosity pkg lbi =
DesktopFile.install $ dstBinDir </> "git-annex"
where
dstBinDir = bindir $ absoluteInstallDirs pkg lbi copyDest