diff options
author | Joey Hess <joeyh@joeyh.name> | 2016-12-30 16:39:51 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2016-12-30 16:39:51 -0400 |
commit | bbdf6091270fab2697c6d7466e0153cbbad234da (patch) | |
tree | 6afb24279b74319b1e4e948d60a1687ec2cfc831 /Utility | |
parent | 524839bd447ed825a2572281e661db12d0c0507f (diff) |
more windows build fix
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 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 |