on develop help sign in
Formatting
d0389e7Brendan Hay
core/src/Network/Google/Types.hs+78−6
@@ -62,22 +62,94 @@ instance ToText AltJSON where toText = const "json"
62instance ToText AltMedia where toText = const "multipart"
62instance ToText AltMedia where toText = const "multipart"
63
63
64newtype OAuthScope = OAuthScope Text
64newtype OAuthScope = OAuthScope Text
65− deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, FromText, ToText, FromJSON, ToJSON)
65+ deriving
66+ ( Eq
67+ , Ord
68+ , Show
69+ , Read
70+ , IsString
71+ , Generic
72+ , Typeable
73+ , FromText
74+ , ToText
75+ , FromJSON
76+ , ToJSON
77+ )
66
78
67newtype AccessToken = AccessToken Text
79newtype AccessToken = AccessToken Text
68− deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, FromText, ToText, FromJSON, ToJSON)
80+ deriving
81+ ( Eq
82+ , Ord
83+ , Show
84+ , Read
85+ , IsString
86+ , Generic
87+ , Typeable
88+ , FromText
89+ , ToText
90+ , FromJSON
91+ , ToJSON
92+ )
69
93
70newtype RefreshToken = RefreshToken Text
94newtype RefreshToken = RefreshToken Text
71− deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, FromText, ToText, FromJSON, ToJSON)
95+ deriving
96+ ( Eq
97+ , Ord
98+ , Show
99+ , Read
100+ , IsString
101+ , Generic
102+ , Typeable
103+ , FromText
104+ , ToText
105+ , FromJSON
106+ , ToJSON
107+ )
72
108
73newtype ClientId = ClientId Text
109newtype ClientId = ClientId Text
74− deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, ToText, FromJSON, ToJSON)
110+ deriving
111+ ( Eq
112+ , Ord
113+ , Show
114+ , Read
115+ , IsString
116+ , Generic
117+ , Typeable
118+ , FromText
119+ , ToText
120+ , FromJSON
121+ , ToJSON
122+ )
75
123
76newtype Secret = Secret Text
124newtype Secret = Secret Text
77− deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, ToText, FromJSON, ToJSON)
125+ deriving
126+ ( Eq
127+ , Ord
128+ , Show
129+ , Read
130+ , IsString
131+ , Generic
132+ , Typeable
133+ , FromText
134+ , ToText
135+ , FromJSON
136+ , ToJSON
137+ )
78
138
79newtype ServiceId = ServiceId Text
139newtype ServiceId = ServiceId Text
80− deriving (Eq, Ord, Show, Read, IsString, Generic, Typeable, ToText, FromJSON, ToJSON)
140+ deriving
141+ ( Eq
142+ , Ord
143+ , Show
144+ , Read
145+ , IsString
146+ , Generic
147+ , Typeable
148+ , FromText
149+ , ToText
150+ , FromJSON
151+ , ToJSON
152+ )
81
153
82newtype MediaDownload a = MediaDownload a
154newtype MediaDownload a = MediaDownload a
83data MediaUpload a = MediaUpload a RequestBody
155data MediaUpload a = MediaUpload a RequestBody