@@ -4,12 +4,8 @@ import Data.Aeson.TH
44import Network.Docker.Utils
55
66dopts :: Options
7−dopts = Options {
7+dopts = defaultOptions {
88 fieldLabelModifier = strip_underscore
9− , constructorTagModifier = id
10− , allNullaryToStringTag = True
11− , omitNothingFields = True
12− , sumEncoding = defaultTaggedObject
139 }
1410
1511