@@ -1348,7 +1348,7 @@ instance FromJSON EnvVar where
1348 parseJSON _ = fail "EnvVar is not a string"
1348 parseJSON _ = fail "EnvVar is not a string"
1350instance ToJSON EnvVar where
1350instance ToJSON EnvVar where
1351− toJSON (EnvVar n v) = object [n .= v]
1351+ toJSON (EnvVar n v) = JSON.String $ n <> T.pack "=" <> v
1353-- | ExposedPort represents a port (and it's type)
1353-- | ExposedPort represents a port (and it's type)
1354-- that a container should expose to other containers or the host system.
1354-- that a container should expose to other containers or the host system.