From 5c03bcea70df9be7236ff3eca7d88fbf05c58895 Mon Sep 17 00:00:00 2001
From: Iustin Pop <iustin@google.com>
Date: Fri, 26 Oct 2012 13:48:45 +0200
Subject: [PATCH] =?utf8?q?Fix=20lint=20issue=20in=20Test/=E2=80=A6/THH.hs?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Sorry!

Signed-off-by: Iustin Pop <iustin@google.com>
Reviewed-by: Michael Hanselmann <hansmi@google.com>
---
 htest/Test/Ganeti/THH.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/htest/Test/Ganeti/THH.hs b/htest/Test/Ganeti/THH.hs
index 45c2b29..90f683c 100644
--- a/htest/Test/Ganeti/THH.hs
+++ b/htest/Test/Ganeti/THH.hs
@@ -46,7 +46,7 @@ import Test.Ganeti.TestCommon
 -- | Type used to test optional field implementation. Equivalent to
 -- @data TestObj = TestObj { tobjA :: Maybe Int, tobjB :: Maybe Int
 -- }@.
-$(buildObject "TestObj" "tobj" $
+$(buildObject "TestObj" "tobj"
   [ optionalField $ simpleField "a" [t| Int |]
   , optionalNullSerField $ simpleField "b" [t| Int |]
   ])
-- 
1.7.10.4