summaryrefslogtreecommitdiff
path: root/Utility
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-12-30 16:39:51 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-12-30 16:39:51 -0400
commitbbdf6091270fab2697c6d7466e0153cbbad234da (patch)
tree6afb24279b74319b1e4e948d60a1687ec2cfc831 /Utility
parent524839bd447ed825a2572281e661db12d0c0507f (diff)
more windows build fix
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 464c8aaf5..f1afd5414 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 = return $ SuCommand NoPromptPassword cmd ps
+mkSuCommand cmd ps = return $ Just $ SuCommand NoPromptPassword cmd ps
#endif