aboutsummaryrefslogtreecommitdiff
path: root/Utility
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-12-30 11:37:24 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-12-30 11:37:24 -0400
commit7cea120676d0315d8cf318f54aa64bfa621e0d5a (patch)
tree20d40097317e0d450a024d498f2054bcbb0f71c8 /Utility
parenta6a5b54a0426e334b8a9e12cd75969a33491d1fd (diff)
fix windows build
Diffstat (limited to 'Utility')
-rw-r--r--Utility/Su.hs2
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