Get things in shape finally:

[list-remote-forwards.git] / src / Main.hs

diff --git a/src/Main.hs b/src/Main.hs
index 13371a836d9f7c537583842241db904ec39df1c8..ab4d05590458d819413da4dccab941d61a3c28cc 100644 (file)
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -74,7 +74,7 @@ main = do
           else connectPostgreSQL (connection_string cfg) >>= report cfg
 
     -- The DB connection is implicitly closed when it gets garbage collected.
-    putStrLn r
+    putStr r
 
   where
     show_sql_error :: SqlError -> IO ()