Commit 9f6f74b4 authored by Iustin Pop's avatar Iustin Pop
Browse files

Fixup too-long-line in Objects.hs

Sorry, didn't see this before pushing the previous commit (277a2ec9

).
Signed-off-by: default avatarIustin Pop <iustin@google.com>
Reviewed-by: default avatarMichael Hanselmann <hansmi@google.com>
Reviewed-by: default avatarGuido Trotter <ultrotter@google.com>
parent 277a2ec9
...@@ -279,7 +279,8 @@ encodeDLId (LIDDrbd8 nodeA nodeB port minorA minorB key) = ...@@ -279,7 +279,8 @@ encodeDLId (LIDDrbd8 nodeA nodeB port minorA minorB key) =
encodeDLId (LIDRados pool name) = JSArray [showJSON pool, showJSON name] encodeDLId (LIDRados pool name) = JSArray [showJSON pool, showJSON name]
encodeDLId (LIDFile driver name) = JSArray [showJSON driver, showJSON name] encodeDLId (LIDFile driver name) = JSArray [showJSON driver, showJSON name]
encodeDLId (LIDBlockDev 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 -- | Custom encoder for DiskLogicalId, composing both the logical id
-- and the extra disk_type field. -- and the extra disk_type field.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment