@@ -3118,9 +3118,11 @@ data User = User'
3118 , _useEmails :: !(Maybe JSONValue)
3118 , _useEmails :: !(Maybe JSONValue)
3119 , _useIms :: !(Maybe JSONValue)
3119 , _useIms :: !(Maybe JSONValue)
3120 , _useIsAdmin :: !(Maybe Bool)
3120 , _useIsAdmin :: !(Maybe Bool)
3121+ , _useIsEnrolledIn2Sv :: !(Maybe Bool)
3121 , _useId :: !(Maybe Text)
3122 , _useId :: !(Maybe Text)
3122 , _useOrganizations :: !(Maybe JSONValue)
3123 , _useOrganizations :: !(Maybe JSONValue)
3123 , _usePrimaryEmail :: !(Maybe Text)
3124 , _usePrimaryEmail :: !(Maybe Text)
3125+ , _useIsEnforcedIn2Sv :: !(Maybe Bool)
3124 , _useNotes :: !(Maybe JSONValue)
3126 , _useNotes :: !(Maybe JSONValue)
3125 , _useIsDelegatedAdmin :: !(Maybe Bool)
3127 , _useIsDelegatedAdmin :: !(Maybe Bool)
3126 , _useIsMailboxSetup :: !(Maybe Bool)
3128 , _useIsMailboxSetup :: !(Maybe Bool)
@@ -3186,12 +3188,16 @@ data User = User'
3187-- * 'useIsAdmin'
3189-- * 'useIsAdmin'
3191+-- * 'useIsEnrolledIn2Sv'
3189-- * 'useId'
3193-- * 'useId'
3191-- * 'useOrganizations'
3195-- * 'useOrganizations'
3193-- * 'usePrimaryEmail'
3197-- * 'usePrimaryEmail'
3199+-- * 'useIsEnforcedIn2Sv'
3195-- * 'useNotes'
3201-- * 'useNotes'
3197-- * 'useIsDelegatedAdmin'
3203-- * 'useIsDelegatedAdmin'
@@ -3232,9 +3238,11 @@ user =
3232 , _useEmails = Nothing
3238 , _useEmails = Nothing
3233 , _useIms = Nothing
3239 , _useIms = Nothing
3234 , _useIsAdmin = Nothing
3240 , _useIsAdmin = Nothing
3241+ , _useIsEnrolledIn2Sv = Nothing
3235 , _useId = Nothing
3242 , _useId = Nothing
3236 , _useOrganizations = Nothing
3243 , _useOrganizations = Nothing
3237 , _usePrimaryEmail = Nothing
3244 , _usePrimaryEmail = Nothing
3245+ , _useIsEnforcedIn2Sv = Nothing
3238 , _useNotes = Nothing
3246 , _useNotes = Nothing
3239 , _useIsDelegatedAdmin = Nothing
3247 , _useIsDelegatedAdmin = Nothing
3240 , _useIsMailboxSetup = Nothing
3248 , _useIsMailboxSetup = Nothing
@@ -3386,6 +3394,12 @@ useIsAdmin :: Lens' User (Maybe Bool)
3386useIsAdmin
3394useIsAdmin
3387 = lens _useIsAdmin (\ s a -> s{_useIsAdmin = a})
3395 = lens _useIsAdmin (\ s a -> s{_useIsAdmin = a})
3397+-- | Is enrolled in 2-step verification (Read-only)
3398+useIsEnrolledIn2Sv :: Lens' User (Maybe Bool)
3400+ = lens _useIsEnrolledIn2Sv
3401+ (\ s a -> s{_useIsEnrolledIn2Sv = a})
3389-- | Unique identifier of User (Read-only)
3403-- | Unique identifier of User (Read-only)
3390useId :: Lens' User (Maybe Text)
3404useId :: Lens' User (Maybe Text)
3391useId = lens _useId (\ s a -> s{_useId = a})
3405useId = lens _useId (\ s a -> s{_useId = a})
@@ -3401,6 +3415,12 @@ usePrimaryEmail
3401 = lens _usePrimaryEmail
3415 = lens _usePrimaryEmail
3402 (\ s a -> s{_usePrimaryEmail = a})
3416 (\ s a -> s{_usePrimaryEmail = a})
3418+-- | Is 2-step verification enforced (Read-only)
3419+useIsEnforcedIn2Sv :: Lens' User (Maybe Bool)
3421+ = lens _useIsEnforcedIn2Sv
3422+ (\ s a -> s{_useIsEnforcedIn2Sv = a})
3404useNotes :: Lens' User (Maybe JSONValue)
3424useNotes :: Lens' User (Maybe JSONValue)
3405useNotes = lens _useNotes (\ s a -> s{_useNotes = a})
3425useNotes = lens _useNotes (\ s a -> s{_useNotes = a})
@@ -3459,9 +3479,11 @@ instance FromJSON User where
3459 <*> (o .:? "emails")
3479 <*> (o .:? "emails")
3460 <*> (o .:? "ims")
3480 <*> (o .:? "ims")
3461 <*> (o .:? "isAdmin")
3481 <*> (o .:? "isAdmin")
3482+ <*> (o .:? "isEnrolledIn2Sv")
3462 <*> (o .:? "id")
3483 <*> (o .:? "id")
3463 <*> (o .:? "organizations")
3484 <*> (o .:? "organizations")
3464 <*> (o .:? "primaryEmail")
3485 <*> (o .:? "primaryEmail")
3486+ <*> (o .:? "isEnforcedIn2Sv")
3465 <*> (o .:? "notes")
3487 <*> (o .:? "notes")
3466 <*> (o .:? "isDelegatedAdmin")
3488 <*> (o .:? "isDelegatedAdmin")
3467 <*> (o .:? "isMailboxSetup")
3489 <*> (o .:? "isMailboxSetup")
@@ -3499,9 +3521,12 @@ instance ToJSON User where
3499 ("name" .=) <$> _useName,
3521 ("name" .=) <$> _useName,
3500 ("password" .=) <$> _usePassword,
3522 ("password" .=) <$> _usePassword,
3501 ("emails" .=) <$> _useEmails, ("ims" .=) <$> _useIms,
3523 ("emails" .=) <$> _useEmails, ("ims" .=) <$> _useIms,
3502− ("isAdmin" .=) <$> _useIsAdmin, ("id" .=) <$> _useId,
3524+ ("isAdmin" .=) <$> _useIsAdmin,
3525+ ("isEnrolledIn2Sv" .=) <$> _useIsEnrolledIn2Sv,
3526+ ("id" .=) <$> _useId,
3503 ("organizations" .=) <$> _useOrganizations,
3527 ("organizations" .=) <$> _useOrganizations,
3504 ("primaryEmail" .=) <$> _usePrimaryEmail,
3528 ("primaryEmail" .=) <$> _usePrimaryEmail,
3529+ ("isEnforcedIn2Sv" .=) <$> _useIsEnforcedIn2Sv,
3505 ("notes" .=) <$> _useNotes,
3530 ("notes" .=) <$> _useNotes,
3506 ("isDelegatedAdmin" .=) <$> _useIsDelegatedAdmin,
3531 ("isDelegatedAdmin" .=) <$> _useIsDelegatedAdmin,
3507 ("isMailboxSetup" .=) <$> _useIsMailboxSetup,
3532 ("isMailboxSetup" .=) <$> _useIsMailboxSetup,
@@ -4516,7 +4541,7 @@ instance ToJSON UserPhone where
4517-- /See:/ 'userPhoto' smart constructor.
4542-- /See:/ 'userPhoto' smart constructor.
4518data UserPhoto = UserPhoto'
4543data UserPhoto = UserPhoto'
4519− { _upPhotoData :: !(Maybe Base64)
4544+ { _upPhotoData :: !(Maybe Bytes)
4520 , _upEtag :: !(Maybe Text)
4545 , _upEtag :: !(Maybe Text)
4521 , _upHeight :: !(Maybe (Textual Int32))
4546 , _upHeight :: !(Maybe (Textual Int32))
4522 , _upKind :: !Text
4547 , _upKind :: !Text
@@ -4563,7 +4588,7 @@ userPhoto =
4563upPhotoData :: Lens' UserPhoto (Maybe ByteString)
4588upPhotoData :: Lens' UserPhoto (Maybe ByteString)
4564upPhotoData
4589upPhotoData
4565 = lens _upPhotoData (\ s a -> s{_upPhotoData = a}) .
4590 = lens _upPhotoData (\ s a -> s{_upPhotoData = a}) .
4566− mapping _Base64
4591+ mapping _Bytes
4568-- | ETag of the resource.
4593-- | ETag of the resource.
4569upEtag :: Lens' UserPhoto (Maybe Text)
4594upEtag :: Lens' UserPhoto (Maybe Text)