on develop help sign in
Correcting name
f659a40Brendan Hay
core/src/Network/Google/Types.hs+1−1
@@ -72,7 +72,7 @@ newtype AuthKey = AuthKey Text
72newtype OAuthScope = OAuthScope { scopeToText :: Text }
72newtype OAuthScope = OAuthScope { scopeToText :: Text }
73 deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, ToText, FromJSON, ToJSON)
73 deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, ToText, FromJSON, ToJSON)
74
74
75−newtype OAuthToken = OAuthToken { tokenToText :: ByteString }
75+newtype OAuthToken = OAuthToken { tokenToBS :: ByteString }
76 deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable)
76 deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable)
77
77
78instance FromJSON OAuthToken where
78instance FromJSON OAuthToken where