summaryrefslogtreecommitdiff
path: root/libraries/libiserv/proxy-src/Remote.hs
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/libiserv/proxy-src/Remote.hs')
-rw-r--r--libraries/libiserv/proxy-src/Remote.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/libraries/libiserv/proxy-src/Remote.hs b/libraries/libiserv/proxy-src/Remote.hs
index c91b2d08c6..d07220ba7f 100644
--- a/libraries/libiserv/proxy-src/Remote.hs
+++ b/libraries/libiserv/proxy-src/Remote.hs
@@ -107,7 +107,8 @@ main = do
putStrLn ("Trying to connect to " ++ host_ip ++ ":" ++ (show port))
out_pipe <- connectTo host_ip port >>= socketToPipe
- putStrLn "Starting proxy"
+ when verbose $
+ putStrLn "Starting proxy"
proxy verbose in_pipe out_pipe
-- | A hook, to transform outgoing (proxy -> slave)