diff options
| author | Egor Tensin <Egor.Tensin@gmail.com> | 2016-08-20 17:55:37 +0300 |
|---|---|---|
| committer | Egor Tensin <Egor.Tensin@gmail.com> | 2016-08-20 17:55:37 +0300 |
| commit | fc5ed9ff90979c077fad5cc6b6f06c6487667777 (patch) | |
| tree | cf33fe64ee0ce4b7dc6a10c5eebf1f9ce270c5f4 /apps/SetEnv.hs | |
| parent | fix HLint warnings (diff) | |
| download | windows-env-fc5ed9ff90979c077fad5cc6b6f06c6487667777.tar.gz windows-env-fc5ed9ff90979c077fad5cc6b6f06c6487667777.zip | |
code style
Diffstat (limited to 'apps/SetEnv.hs')
| -rw-r--r-- | apps/SetEnv.hs | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/apps/SetEnv.hs b/apps/SetEnv.hs index debc1d0..debc62d 100644 --- a/apps/SetEnv.hs +++ b/apps/SetEnv.hs @@ -28,18 +28,18 @@ optionParser = Options <*> optNameDesc <*> optValueDesc where - optYesDesc = switch $ - long "yes" <> short 'y' <> - help "Skip confirmation prompt" - optGlobalDesc = switch $ - long "global" <> short 'g' <> - help "Set for all users" - optNameDesc = argument str $ - metavar "NAME" <> - help "Variable name" - optValueDesc = argument str $ - metavar "VALUE" <> - help "Variable value" + optYesDesc = switch + $ long "yes" <> short 'y' + <> help "Skip confirmation prompt" + optGlobalDesc = switch + $ long "global" <> short 'g' + <> help "Set for all users" + optNameDesc = argument str + $ metavar "NAME" + <> help "Variable name" + optValueDesc = argument str + $ metavar "VALUE" + <> help "Variable value" main :: IO () main = execParser parser >>= setEnv |