aboutsummaryrefslogtreecommitdiffstatshomepage
path: root/app/SetEnv.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/SetEnv.hs')
-rw-r--r--app/SetEnv.hs5
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