diff options
author | Joey Hess <joeyh@joeyh.name> | 2016-12-30 11:37:24 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2016-12-30 11:37:24 -0400 |
commit | 7cea120676d0315d8cf318f54aa64bfa621e0d5a (patch) | |
tree | 20d40097317e0d450a024d498f2054bcbb0f71c8 /Utility | |
parent | a6a5b54a0426e334b8a9e12cd75969a33491d1fd (diff) |
fix windows build
Diffstat (limited to 'Utility')
-rw-r--r-- | Utility/Su.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/Su.hs b/Utility/Su.hs index ace8cbf3e..464c8aaf5 100644 --- a/Utility/Su.hs +++ b/Utility/Su.hs @@ -98,5 +98,5 @@ mkSuCommand cmd ps = firstM (\(SuCommand _ p _) -> inPath p) =<< selectcmds shellcmd = unwords $ map shellEscape (cmd:toCommand ps) #else -- 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 |