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/AddPath.hs | |
| parent | refactoring (diff) | |
| download | windows-env-d70025b57690133675a36c5974affa9edc5d50fb.tar.gz windows-env-d70025b57690133675a36c5974affa9edc5d50fb.zip | |
code style
Diffstat (limited to 'apps/AddPath.hs')
| -rw-r--r-- | apps/AddPath.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/apps/AddPath.hs b/apps/AddPath.hs index a3004a8..9c6c245 100644 --- a/apps/AddPath.hs +++ b/apps/AddPath.hs @@ -60,8 +60,9 @@ addPath options = do pathsToAdd = optPaths options forAllUsers = optGlobal options - env | forAllUsers = Environment.AllUsers - | otherwise = Environment.CurrentUser + env = if forAllUsers + then Environment.AllUsers + else Environment.CurrentUser query = Environment.query env varName |