mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix windows build

Browse source
This commit is contained in:
Joey Hess 2016-12-30 11:37:24 -04:00
parent cf6c5d5ca9
commit dfbd303d66
No known key found for this signature in database
GPG key ID: C910D9222512E3C7
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Utility/Su.hs
View file

@ -98,5 +98,5 @@ mkSuCommand cmd ps = firstM (\(SuCommand _ p _) -> inPath p) =<< selectcmds
shellcmd = unwords $ map shellEscape (cmd:toCommand ps) shellcmd = unwords $ map shellEscape (cmd:toCommand ps)
#else #else
-- For windows, we assume the user has administrator access. -- For windows, we assume the user has administrator access.
mkSuCommand cmd ps = SuCommand NoPromptPassword cmd ps mkSuCommand cmd ps = return $ SuCommand NoPromptPassword cmd ps
#endif #endif