constants: Move most paths to separate module

[ganeti-local] / htools / Ganeti / Confd.hs

diff --git a/htools/Ganeti/Confd.hs b/htools/Ganeti/Confd.hs
index 37ad521..6746f86 100644 (file)
--- a/htools/Ganeti/Confd.hs
+++ b/htools/Ganeti/Confd.hs
@@ -146,7 +146,7 @@ $(declareIADT "ConfdErrorType"
   ])
 $(makeJSONInstance ''ConfdErrorType)
 
-$(buildObject "ConfdRequest" "confdRq" $
+$(buildObject "ConfdRequest" "confdRq"
   [ simpleField "protocol" [t| Int |]
   , simpleField "type"     [t| ConfdRequestType |]
   , defaultField [| EmptyQuery |] $ simpleField "query" [t| ConfdQuery |]