diff options
Diffstat (limited to '')
-rw-r--r-- | app/SetEnv.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/app/SetEnv.hs b/app/SetEnv.hs index e77b05a..6932198 100644 --- a/app/SetEnv.hs +++ b/app/SetEnv.hs @@ -56,14 +56,13 @@ setEnv options = runExceptT doSetEnv >>= either ioError return where varName = optName options varValue = optValue options - forAllUsers = optGlobal options + skipPrompt = optYes options + profile | forAllUsers = WindowsEnv.AllUsers | otherwise = WindowsEnv.CurrentUser - skipPrompt = optYes options - doSetEnv = do expanded <- WindowsEnv.expand varValue let expandable = expanded /= varValue |