summaryrefslogtreecommitdiff
path: root/configure.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-11-22 15:46:57 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-11-22 15:46:57 -0400
commit57adb0347bf4eb71ab846a2947680a20263449a2 (patch)
treeeb9df0ec57462a2a45bf2ff0d6c1d05d5677634f /configure.hs
parentfd11b5a3e5355a68f182a60eda7916d57e141366 (diff)
hlint tweaks
Remotes.hs next, and also Backend/* and Command/*
Diffstat (limited to 'configure.hs')
-rw-r--r--configure.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/configure.hs b/configure.hs
index 4d0624a42..7d3fc0127 100644
--- a/configure.hs
+++ b/configure.hs
@@ -10,7 +10,7 @@ data TestDesc = TestDesc String String Test
data Config = Config String Bool
instance Show Config where
- show (Config key value) = unlines $ [
+ show (Config key value) = unlines [
key ++ " :: Bool"
, key ++ " = " ++ show value
]
@@ -36,7 +36,7 @@ quiet s = s ++ " >/dev/null 2>&1"
requireCommand :: String -> String -> Test
requireCommand command cmdline = do
ret <- testCmd $ quiet cmdline
- if (ret)
+ if ret
then return True
else do
testEnd False
@@ -57,7 +57,7 @@ testStart s = do
hFlush stdout
testEnd :: Bool -> IO ()
-testEnd r = putStrLn $ " " ++ (show r)
+testEnd r = putStrLn $ " " ++ show r
writeSysConfig :: [Config] -> IO ()
writeSysConfig config = writeFile "SysConfig.hs" body