Fix EnvVar JSON encoding
commita21b3497c82c4df7aacf415fb6772c9d0119abf7
authorDaQuirm <leo.daquirm@gmail.com>
dateSat 6 Jan 2018, 23:40 (9 years ago)
parent966b66d
src/Docker/Client/Types.hs+1−1
@@ -1348,7 +1348,7 @@ instance FromJSON EnvVar where
13481348 parseJSON _ = fail "EnvVar is not a string"
13491349
13501350instance ToJSON EnvVar where
1351− toJSON (EnvVar n v) = object [n .= v]
1351+ toJSON (EnvVar n v) = JSON.String $ n <> T.pack "=" <> v
13521352
13531353-- | ExposedPort represents a port (and it's type)
13541354-- that a container should expose to other containers or the host system.