diff options
| author | Egor Tensin <Egor.Tensin@gmail.com> | 2016-07-11 19:11:23 +0300 |
|---|---|---|
| committer | Egor Tensin <Egor.Tensin@gmail.com> | 2016-07-11 19:11:23 +0300 |
| commit | 7b3fd9218596a2d7a14a92625a4d62c9a7b7b0f6 (patch) | |
| tree | 8195393c18d0cdd3d9ebcdadb014d75285bfaf7e /apps/ListPath.hs | |
| parent | become a proper stack project (diff) | |
| download | windows-env-7b3fd9218596a2d7a14a92625a4d62c9a7b7b0f6.tar.gz windows-env-7b3fd9218596a2d7a14a92625a4d62c9a7b7b0f6.zip | |
rename modules + fix compiler warnings
Diffstat (limited to 'apps/ListPath.hs')
| -rw-r--r-- | apps/ListPath.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/apps/ListPath.hs b/apps/ListPath.hs index ca72e87..75f1b27 100644 --- a/apps/ListPath.hs +++ b/apps/ListPath.hs @@ -12,7 +12,7 @@ import System.Environment ( getArgs, getProgName ) import System.Exit ( exitFailure, exitSuccess ) import System.IO ( hPutStr, stderr ) -import qualified EnvUtils +import qualified Environment main :: IO () main = do @@ -27,8 +27,8 @@ main = do listPath :: Options -> IO () listPath options = do - val <- EnvUtils.getEnv $ name options - mapM_ printPath $ EnvUtils.splitPaths val + val <- Environment.getEnv $ name options + mapM_ printPath $ Environment.splitPaths val where printPath p = do exists <- doesDirectoryExist p |