request admin rights at install

This commit is contained in:
Joey Hess 2013-12-10 00:32:08 -04:00
parent 29f440289b
commit db8a980c70
2 changed files with 9 additions and 3 deletions

View file

@ -85,7 +85,7 @@ makeInstaller gitannex license extrafiles = nsis $ do
{- Installing into the same directory as git avoids needing to modify
- path myself, since the git installer already does it. -}
installDir gitInstallDir
requestExecutionLevel User
requestExecutionLevel Admin
iff (fileExists gitInstallDir)
(return ())