summaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-11-03 10:38:08 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-11-03 10:38:08 -0400
commit94b7c09a14f4f554fda6fc2c7fce65d64246344a (patch)
tree07950c656b4d544cb9074239435a3c24bf5d622d /Build
parent3a19893f0041eb716cdc3eb61278d17eebd49839 (diff)
Avoid installing desktop file and program file if cabal install git-annex is run as root, since that is not a systemwide install, but to /root, and so generating a systemwide desktop file is not right.
Diffstat (limited to 'Build')
-rw-r--r--Build/DesktopFile.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/Build/DesktopFile.hs b/Build/DesktopFile.hs
index 9d68ff1d9..cb5a47b69 100644
--- a/Build/DesktopFile.hs
+++ b/Build/DesktopFile.hs
@@ -79,3 +79,9 @@ install command = do
createDirectoryIfMissing True (parentDir programfile)
writeFile programfile command
)
+
+installUser :: FilePath -> IO ()
+installUser command = ifM systemwideInstall
+ ( install command
+ , return ()
+ )