diff options
| author |  Herbert Valerio Riedel <hvr@gnu.org> | 2014-12-06 17:08:06 +0100 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2014-12-06 17:08:06 +0100 |
| commit | 078666f4399f368e2f3dd82b5081dc1ad9b9fdc2 (patch) | |
| tree | 247882ab50a9e32a659aa513751f9e16ec310207 /System/Posix/Env | |
| parent | 558b0fb4eaa4aebc823022b3e1d560da3faad658 (diff) | |
`M-x untabify` && `M-x delete-trailing-whitespace`
Diffstat (limited to 'System/Posix/Env')
| -rw-r--r-- | System/Posix/Env/ByteString.hsc | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/System/Posix/Env/ByteString.hsc b/System/Posix/Env/ByteString.hsc index 1346a77..9f69c4c 100644 --- a/System/Posix/Env/ByteString.hsc +++ b/System/Posix/Env/ByteString.hsc @@ -6,7 +6,7 @@ -- Module : System.Posix.Env.ByteString -- Copyright : (c) The University of Glasgow 2002 -- License : BSD-style (see the file libraries/base/LICENSE) --- +-- -- Maintainer : libraries@haskell.org -- Stability : provisional -- Portability : non-portable (requires POSIX) @@ -18,10 +18,10 @@ module System.Posix.Env.ByteString ( -- * Environment Variables getEnv - , getEnvDefault - , getEnvironmentPrim - , getEnvironment - , putEnv + , getEnvDefault + , getEnvironmentPrim + , getEnvironment + , putEnv , setEnv , unsetEnv @@ -34,7 +34,7 @@ module System.Posix.Env.ByteString ( import Foreign import Foreign.C import Control.Monad ( liftM ) -import Data.Maybe ( fromMaybe ) +import Data.Maybe ( fromMaybe ) import qualified Data.ByteString as B import qualified Data.ByteString.Char8 as BC @@ -130,7 +130,7 @@ setEnv key value ovrwrt = do B.useAsCString key $ \ keyP -> B.useAsCString value $ \ valueP -> throwErrnoIfMinus1_ "setenv" $ - c_setenv keyP valueP (fromIntegral (fromEnum ovrwrt)) + c_setenv keyP valueP (fromIntegral (fromEnum ovrwrt)) foreign import ccall unsafe "setenv" c_setenv :: CString -> CString -> CInt -> IO CInt |