diff options
| author | joe <joe@jerkface.net> | 2014-04-21 22:21:50 -0400 |
|---|---|---|
| committer | joe <joe@jerkface.net> | 2014-04-21 22:21:50 -0400 |
| commit | ce4576743a98f225ed9e036ddc8d1eb02ced6dfa (patch) | |
| tree | 50b0d7224ca1726838964ac8c652a77fb7c355e7 | |
| parent | aa2b2ffbcdadaed3025957fb5d0ace5fec4533f1 (diff) | |
signature for systemEnv
| -rw-r--r-- | ProcessUtils.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ProcessUtils.hs b/ProcessUtils.hs index 7f7928c..4e3ac38 100644 --- a/ProcessUtils.hs +++ b/ProcessUtils.hs | |||
| @@ -16,6 +16,7 @@ import System.Exit ( ExitCode(..) ) | |||
| 16 | -- | systemEnv | 16 | -- | systemEnv |
| 17 | -- This is like System.Process.system except that it lets you set | 17 | -- This is like System.Process.system except that it lets you set |
| 18 | -- some environment variables. | 18 | -- some environment variables. |
| 19 | systemEnv :: [(String, String)] -> String -> IO ExitCode | ||
| 19 | systemEnv _ "" = | 20 | systemEnv _ "" = |
| 20 | ioException (ioeSetErrorString (mkIOError InvalidArgument "system" Nothing Nothing) "null command") | 21 | ioException (ioeSetErrorString (mkIOError InvalidArgument "system" Nothing Nothing) "null command") |
| 21 | systemEnv vars cmd = do | 22 | systemEnv vars cmd = do |