diff --git a/htools/Ganeti/Objects.hs b/htools/Ganeti/Objects.hs
index 22aac937cce7b00c9a58b41b157377b175fb880c..7d13c4c1353680f067e735ecd46b7a8f79a2bedb 100644
--- a/htools/Ganeti/Objects.hs
+++ b/htools/Ganeti/Objects.hs
@@ -279,7 +279,8 @@ encodeDLId (LIDDrbd8 nodeA nodeB port minorA minorB key) =
 encodeDLId (LIDRados pool name) = JSArray [showJSON pool, showJSON name]
 encodeDLId (LIDFile driver name) = JSArray [showJSON driver, showJSON name]
 encodeDLId (LIDBlockDev driver name) = JSArray [showJSON driver, showJSON name]
-encodeDLId (LIDExt extprovider name) = JSArray [showJSON extprovider, showJSON name]
+encodeDLId (LIDExt extprovider name) =
+  JSArray [showJSON extprovider, showJSON name]
 
 -- | Custom encoder for DiskLogicalId, composing both the logical id
 -- and the extra disk_type field.