From 289c3835e9539db0d8c2fc611965e7299ed16b72 Mon Sep 17 00:00:00 2001
From: Iustin Pop <iustin@google.com>
Date: Tue, 10 Mar 2009 19:59:50 +0100
Subject: [PATCH] Limit string literals to 80-char columns

Learned how multi-line string literals work in Haskell :)
---
 src/hbal.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/hbal.hs b/src/hbal.hs
index 24917111c..fac037d50 100644
--- a/src/hbal.hs
+++ b/src/hbal.hs
@@ -151,7 +151,8 @@ main = do
              (length bad_nodes) (length bad_instances)
 
   when (length bad_nodes > 0) $ do
-         putStrLn "Cluster is not N+1 happy, continuing but no guarantee that cluster will end N+1 happy."
+         putStrLn "Cluster is not N+1 happy, continuing but no guarantee \
+                  \that the cluster will end N+1 happy."
 
   when (optShowNodes opts) $
        do
-- 
GitLab