on develop help sign in
Regenerating vision API library with corrected prefixes
commitf58680ad0ba24908e6dfa371dfaa9e0d31170f9a authorBrendan Hay <brendan.g.hay@gmail.com> dateFri 18 Mar 2016, 16:11 (11 years ago) parent5d69fb4
4 files changed+20−20
gogol-vision/gen/Network/Google/Resource/Vision/Images/Annotate.hs+3−3 gogol-vision/gen/Network/Google/Vision.hs+5−5 gogol-vision/gen/Network/Google/Vision/Types.hs+5−5 gogol-vision/gen/Network/Google/Vision/Types/Sum.hs+7−7
gogol-vision/gen/Network/Google/Resource/Vision/Images/Annotate.hs+3−3
@@ -51,7 +51,7 @@ import Network.Google.Vision.Types
5151type ImagesAnnotateResource =
5252 "v1" :>
5353 "images:annotate" :>
54− QueryParam "$.xgafv" $Xgafv :>
54+ QueryParam "$.xgafv" Xgafv :>
5555 QueryParam "upload_protocol" Text :>
5656 QueryParam "pp" Bool :>
5757 QueryParam "access_token" Text :>
@@ -66,7 +66,7 @@ type ImagesAnnotateResource =
6666--
6767-- /See:/ 'imagesAnnotate' smart constructor.
6868data ImagesAnnotate = ImagesAnnotate
69− { _iaXgafv :: !(Maybe $ Xgafv)
69+ { _iaXgafv :: !(Maybe Xgafv)
7070 , _iaUploadProtocol :: !(Maybe Text)
7171 , _iaPp :: !Bool
7272 , _iaAccessToken :: !(Maybe Text)
@@ -111,7 +111,7 @@ imagesAnnotate pIaPayload_ =
111111 }
112112
113113-- | V1 error format.
114−iaXgafv :: Lens' ImagesAnnotate (Maybe $Xgafv)
114+iaXgafv :: Lens' ImagesAnnotate (Maybe Xgafv)
115115iaXgafv = lens _iaXgafv (\ s a -> s{_iaXgafv = a})
116116
117117-- | Upload protocol for media (e.g. \"raw\", \"multipart\").
gogol-vision/gen/Network/Google/Vision.hs+5−5
@@ -198,8 +198,8 @@ module Network.Google.Vision
198198 -- ** LandmarkType
199199 , LandmarkType (..)
200200
201− -- ** $Xgafv
202− , $Xgafv (..)
201+ -- ** Xgafv
202+ , Xgafv (..)
203203
204204 -- ** ImageSource
205205 , ImageSource
@@ -256,9 +256,9 @@ module Network.Google.Vision
256256 , pY
257257 ) where
258258
259−import Network.Google.Prelude
260−import Network.Google.Resource.Vision.Images.Annotate
261−import Network.Google.Vision.Types
259+import Network.Google.Prelude
260+import Network.Google.Resource.Vision.Images.Annotate
261+import Network.Google.Vision.Types
262262
263263{- $resources
264264TODO
gogol-vision/gen/Network/Google/Vision/Types.hs+5−5
@@ -182,8 +182,8 @@ module Network.Google.Vision.Types
182182 -- * LandmarkType
183183 , LandmarkType (..)
184184
185− -- * $Xgafv
186− , $Xgafv (..)
185+ -- * Xgafv
186+ , Xgafv (..)
187187
188188 -- * ImageSource
189189 , ImageSource
@@ -240,9 +240,9 @@ module Network.Google.Vision.Types
240240 , pY
241241 ) where
242242
243−import Network.Google.Prelude
244−import Network.Google.Vision.Types.Product
245−import Network.Google.Vision.Types.Sum
243+import Network.Google.Prelude
244+import Network.Google.Vision.Types.Product
245+import Network.Google.Vision.Types.Sum
246246
247247-- | Default request referring to version 'v1' of the Cloud Vision API. This contains the host and root path used as a starting point for constructing service requests.
248248visionService :: ServiceConfig
gogol-vision/gen/Network/Google/Vision/Types/Sum.hs+7−7
@@ -617,7 +617,7 @@ instance ToJSON LandmarkType where
617617 toJSON = toJSONText
618618
619619-- | V1 error format.
620−data $Xgafv
620+data Xgafv
621621 = $1
622622 -- ^ @1@
623623 -- v1 error format
@@ -626,23 +626,23 @@ data $Xgafv
626626 -- v2 error format
627627 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
628628
629−instance Hashable $Xgafv
629+instance Hashable Xgafv
630630
631−instance FromText $Xgafv where
631+instance FromText Xgafv where
632632 fromText = \case
633633 "1" -> Just $1
634634 "2" -> Just $2
635635 _ -> Nothing
636636
637−instance ToText $Xgafv where
637+instance ToText Xgafv where
638638 toText = \case
639639 $1 -> "1"
640640 $2 -> "2"
641641
642−instance FromJSON $Xgafv where
643− parseJSON = parseJSONText "$Xgafv"
642+instance FromJSON Xgafv where
643+ parseJSON = parseJSONText "Xgafv"
644644
645−instance ToJSON $Xgafv where
645+instance ToJSON Xgafv where
646646 toJSON = toJSONText
647647
648648-- | Spoof likelihood. The likelihood that an obvious modification was made