diff options
| author | Egor Tensin <Egor.Tensin@gmail.com> | 2016-07-17 18:33:45 +0300 |
|---|---|---|
| committer | Egor Tensin <Egor.Tensin@gmail.com> | 2016-07-17 18:33:45 +0300 |
| commit | d70025b57690133675a36c5974affa9edc5d50fb (patch) | |
| tree | 52f12e7649f3c7daf5dfffce2f5d89d9bee2b94e /apps/SetEnv.hs | |
| parent | refactoring (diff) | |
| download | windows-env-d70025b57690133675a36c5974affa9edc5d50fb.tar.gz windows-env-d70025b57690133675a36c5974affa9edc5d50fb.zip | |
code style
Diffstat (limited to 'apps/SetEnv.hs')
| -rw-r--r-- | apps/SetEnv.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/apps/SetEnv.hs b/apps/SetEnv.hs index 54a3cde..3b88e7c 100644 --- a/apps/SetEnv.hs +++ b/apps/SetEnv.hs @@ -50,8 +50,9 @@ setEnv options = engrave varValue varValue = optValue options forAllUsers = optGlobal options - env | forAllUsers = Environment.AllUsers - | otherwise = Environment.CurrentUser + env = if forAllUsers + then Environment.AllUsers + else Environment.CurrentUser skipPrompt = optYes options engrave value = if skipPrompt |