diff options
| author | Egor Tensin <Egor.Tensin@gmail.com> | 2016-07-13 03:40:41 +0300 |
|---|---|---|
| committer | Egor Tensin <Egor.Tensin@gmail.com> | 2016-07-13 03:40:41 +0300 |
| commit | d805523baec28129e5e7089cb53092406bcd8a25 (patch) | |
| tree | cb3e74aaee466020a98ada4f5a41787b034f9a46 /apps | |
| parent | bugfix + refactoring (diff) | |
| download | windows-env-d805523baec28129e5e7089cb53092406bcd8a25.tar.gz windows-env-d805523baec28129e5e7089cb53092406bcd8a25.zip | |
code style
Diffstat (limited to 'apps')
| -rw-r--r-- | apps/AddPath.hs | 4 | ||||
| -rw-r--r-- | apps/RemovePath.hs | 4 | ||||
| -rw-r--r-- | apps/SetEnv.hs | 4 | ||||
| -rw-r--r-- | apps/UnsetEnv.hs | 2 |
4 files changed, 7 insertions, 7 deletions
diff --git a/apps/AddPath.hs b/apps/AddPath.hs index ad65242..aeb5ee5 100644 --- a/apps/AddPath.hs +++ b/apps/AddPath.hs @@ -15,9 +15,9 @@ import Options.Applicative import qualified Environment data Options = Options - { optName :: String + { optName :: String , optGlobal :: Bool - , optPaths :: [String] + , optPaths :: [String] } deriving (Eq, Show) options :: Parser Options diff --git a/apps/RemovePath.hs b/apps/RemovePath.hs index 2fecda6..87c60a4 100644 --- a/apps/RemovePath.hs +++ b/apps/RemovePath.hs @@ -15,9 +15,9 @@ import Options.Applicative import qualified Environment data Options = Options - { optName :: String + { optName :: String , optGlobal :: Bool - , optPaths :: [String] + , optPaths :: [String] } deriving (Eq, Show) options = Options diff --git a/apps/SetEnv.hs b/apps/SetEnv.hs index 812975b..293b062 100644 --- a/apps/SetEnv.hs +++ b/apps/SetEnv.hs @@ -12,8 +12,8 @@ import qualified Environment data Options = Options { optGlobal :: Bool - , optName :: String - , optValue :: String + , optName :: String + , optValue :: String } deriving (Eq, Show) options :: Parser Options diff --git a/apps/UnsetEnv.hs b/apps/UnsetEnv.hs index 51f71e8..f7bf0b2 100644 --- a/apps/UnsetEnv.hs +++ b/apps/UnsetEnv.hs @@ -12,7 +12,7 @@ import qualified Environment data Options = Options { optGlobal :: Bool - , optName :: String + , optName :: String } deriving (Eq, Show) options :: Parser Options |