on develop help sign in
Updating AltMedia 'singleton' to return the correct multipart media type
61dd6a6Brendan Hay
core/src/Network/Google/Types.hs+1−1
@@ -58,7 +58,7 @@ data AltJSON = AltJSON deriving (Eq, Ord, Show, Read, Generic, Typeable)
58data AltMedia = AltMedia deriving (Eq, Ord, Show, Read, Generic, Typeable)
58data AltMedia = AltMedia deriving (Eq, Ord, Show, Read, Generic, Typeable)
59
59
60instance ToText AltJSON where toText = const "json"
60instance ToText AltJSON where toText = const "json"
61−instance ToText AltMedia where toText = const "media"
61+instance ToText AltMedia where toText = const "multipart"
62
62
63newtype OAuthScope = OAuthScope Text
63newtype OAuthScope = OAuthScope Text
64 deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, FromText, ToText, FromJSON, ToJSON)
64 deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, FromText, ToText, FromJSON, ToJSON)