@@ -1128,23 +1128,25 @@ instance ToJSON GeolayerDataGeoViewport where
11281128--
11291129-- /See:/ 'volumeUserInfo' smart constructor.
11301130data VolumeUserInfo = VolumeUserInfo'
1131− { _vuiIsFamilySharingAllowed :: !(Maybe Bool)
1132− , _vuiIsFamilySharedToUser :: !(Maybe Bool)
1133− , _vuiCopy :: !(Maybe VolumeUserInfoCopy)
1134− , _vuiUserUploadedVolumeInfo :: !(Maybe VolumeUserInfoUserUploadedVolumeInfo)
1135− , _vuiIsPurchased :: !(Maybe Bool)
1136− , _vuiEntitlementType :: !(Maybe (Textual Int32))
1137− , _vuiAcquisitionType :: !(Maybe (Textual Int32))
1138− , _vuiAcquiredTime :: !(Maybe DateTime')
1139− , _vuiRentalState :: !(Maybe Text)
1140− , _vuiIsPreOrdered :: !(Maybe Bool)
1141− , _vuiReview :: !(Maybe Review)
1142− , _vuiIsFamilySharedFromUser :: !(Maybe Bool)
1143− , _vuiRentalPeriod :: !(Maybe VolumeUserInfoRentalPeriod)
1144− , _vuiUpdated :: !(Maybe DateTime')
1145− , _vuiIsUploaded :: !(Maybe Bool)
1146− , _vuiIsInMyBooks :: !(Maybe Bool)
1147− , _vuiReadingPosition :: !(Maybe ReadingPosition)
1131+ { _vuiIsFamilySharingAllowed :: !(Maybe Bool)
1132+ , _vuiIsFamilySharedToUser :: !(Maybe Bool)
1133+ , _vuiCopy :: !(Maybe VolumeUserInfoCopy)
1134+ , _vuiUserUploadedVolumeInfo :: !(Maybe VolumeUserInfoUserUploadedVolumeInfo)
1135+ , _vuiIsPurchased :: !(Maybe Bool)
1136+ , _vuiEntitlementType :: !(Maybe (Textual Int32))
1137+ , _vuiAcquisitionType :: !(Maybe (Textual Int32))
1138+ , _vuiAcquiredTime :: !(Maybe DateTime')
1139+ , _vuiRentalState :: !(Maybe Text)
1140+ , _vuiIsPreOrdered :: !(Maybe Bool)
1141+ , _vuiReview :: !(Maybe Review)
1142+ , _vuiIsFamilySharedFromUser :: !(Maybe Bool)
1143+ , _vuiRentalPeriod :: !(Maybe VolumeUserInfoRentalPeriod)
1144+ , _vuiUpdated :: !(Maybe DateTime')
1145+ , _vuiIsUploaded :: !(Maybe Bool)
1146+ , _vuiIsInMyBooks :: !(Maybe Bool)
1147+ , _vuiReadingPosition :: !(Maybe ReadingPosition)
1148+ , _vuiFamilySharing :: !(Maybe VolumeUserInfoFamilySharing)
1149+ , _vuiIsFamilySharingDisabledByFop :: !(Maybe Bool)
11481150 } deriving (Eq,Show,Data,Typeable,Generic)
11491151
11501152-- | Creates a value of 'VolumeUserInfo' with the minimum fields required to make a request.
@@ -1184,6 +1186,10 @@ data VolumeUserInfo = VolumeUserInfo'
11841186-- * 'vuiIsInMyBooks'
11851187--
11861188-- * 'vuiReadingPosition'
1189+--
1190+-- * 'vuiFamilySharing'
1191+--
1192+-- * 'vuiIsFamilySharingDisabledByFop'
11871193volumeUserInfo
11881194 :: VolumeUserInfo
11891195volumeUserInfo =
@@ -1205,11 +1211,11 @@ volumeUserInfo =
12051211 , _vuiIsUploaded = Nothing
12061212 , _vuiIsInMyBooks = Nothing
12071213 , _vuiReadingPosition = Nothing
1214+ , _vuiFamilySharing = Nothing
1215+ , _vuiIsFamilySharingDisabledByFop = Nothing
12081216 }
12091217
1210−-- | Whether or not this volume can be shared with the family by the user.
1211−-- This includes sharing eligibility of both the volume and the user. If
1212−-- the value is true, the user can initiate a family sharing action.
1218+-- | Deprecated: Replaced by familySharing.
12131219vuiIsFamilySharingAllowed :: Lens' VolumeUserInfo (Maybe Bool)
12141220vuiIsFamilySharingAllowed
12151221 = lens _vuiIsFamilySharingAllowed
@@ -1317,6 +1323,18 @@ vuiReadingPosition
13171323 = lens _vuiReadingPosition
13181324 (\ s a -> s{_vuiReadingPosition = a})
13191325
1326+-- | Information on the ability to share with the family.
1327+vuiFamilySharing :: Lens' VolumeUserInfo (Maybe VolumeUserInfoFamilySharing)
1328+vuiFamilySharing
1329+ = lens _vuiFamilySharing
1330+ (\ s a -> s{_vuiFamilySharing = a})
1331+
1332+-- | Deprecated: Replaced by familySharing.
1333+vuiIsFamilySharingDisabledByFop :: Lens' VolumeUserInfo (Maybe Bool)
1334+vuiIsFamilySharingDisabledByFop
1335+ = lens _vuiIsFamilySharingDisabledByFop
1336+ (\ s a -> s{_vuiIsFamilySharingDisabledByFop = a})
1337+
13201338instance FromJSON VolumeUserInfo where
13211339 parseJSON
13221340 = withObject "VolumeUserInfo"
@@ -1338,7 +1356,9 @@ instance FromJSON VolumeUserInfo where
13381356 <*> (o .:? "updated")
13391357 <*> (o .:? "isUploaded")
13401358 <*> (o .:? "isInMyBooks")
1341− <*> (o .:? "readingPosition"))
1359+ <*> (o .:? "readingPosition")
1360+ <*> (o .:? "familySharing")
1361+ <*> (o .:? "isFamilySharingDisabledByFop"))
13421362
13431363instance ToJSON VolumeUserInfo where
13441364 toJSON VolumeUserInfo'{..}
@@ -1364,7 +1384,10 @@ instance ToJSON VolumeUserInfo where
13641384 ("updated" .=) <$> _vuiUpdated,
13651385 ("isUploaded" .=) <$> _vuiIsUploaded,
13661386 ("isInMyBooks" .=) <$> _vuiIsInMyBooks,
1367− ("readingPosition" .=) <$> _vuiReadingPosition])
1387+ ("readingPosition" .=) <$> _vuiReadingPosition,
1388+ ("familySharing" .=) <$> _vuiFamilySharing,
1389+ ("isFamilySharingDisabledByFop" .=) <$>
1390+ _vuiIsFamilySharingDisabledByFop])
13681391
13691392--
13701393-- /See:/ 'layersummary' smart constructor.
@@ -2291,10 +2314,13 @@ instance ToJSON Bookshelf where
22912314--
22922315-- /See:/ 'notification' smart constructor.
22932316data Notification = Notification'
2294− { _nTargetURL :: !(Maybe Text)
2317+ { _nDocType :: !(Maybe Text)
2318+ , _nTargetURL :: !(Maybe Text)
22952319 , _nShowNotificationSettingsAction :: !(Maybe Bool)
2320+ , _nDocId :: !(Maybe Text)
22962321 , _nKind :: !Text
22972322 , _nBody :: !(Maybe Text)
2323+ , _nCrmExperimentIds :: !(Maybe [Textual Int64])
22982324 , _nPcampaignId :: !(Maybe Text)
22992325 , _nReason :: !(Maybe Text)
23002326 , _nDontShowNotification :: !(Maybe Bool)
@@ -2307,14 +2333,20 @@ data Notification = Notification'
23072333--
23082334-- Use one of the following lenses to modify other fields as desired:
23092335--
2336+-- * 'nDocType'
2337+--
23102338-- * 'nTargetURL'
23112339--
23122340-- * 'nShowNotificationSettingsAction'
23132341--
2342+-- * 'nDocId'
2343+--
23142344-- * 'nKind'
23152345--
23162346-- * 'nBody'
23172347--
2348+-- * 'nCrmExperimentIds'
2349+--
23182350-- * 'nPcampaignId'
23192351--
23202352-- * 'nReason'
@@ -2330,10 +2362,13 @@ notification
23302362 :: Notification
23312363notification =
23322364 Notification'
2333− { _nTargetURL = Nothing
2365+ { _nDocType = Nothing
2366+ , _nTargetURL = Nothing
23342367 , _nShowNotificationSettingsAction = Nothing
2368+ , _nDocId = Nothing
23352369 , _nKind = "books#notification"
23362370 , _nBody = Nothing
2371+ , _nCrmExperimentIds = Nothing
23372372 , _nPcampaignId = Nothing
23382373 , _nReason = Nothing
23392374 , _nDontShowNotification = Nothing
@@ -2342,6 +2377,9 @@ notification =
23422377 , _nTitle = Nothing
23432378 }
23442379
2380+nDocType :: Lens' Notification (Maybe Text)
2381+nDocType = lens _nDocType (\ s a -> s{_nDocType = a})
2382+
23452383nTargetURL :: Lens' Notification (Maybe Text)
23462384nTargetURL
23472385 = lens _nTargetURL (\ s a -> s{_nTargetURL = a})
@@ -2351,6 +2389,9 @@ nShowNotificationSettingsAction
23512389 = lens _nShowNotificationSettingsAction
23522390 (\ s a -> s{_nShowNotificationSettingsAction = a})
23532391
2392+nDocId :: Lens' Notification (Maybe Text)
2393+nDocId = lens _nDocId (\ s a -> s{_nDocId = a})
2394+
23542395-- | Resource type.
23552396nKind :: Lens' Notification Text
23562397nKind = lens _nKind (\ s a -> s{_nKind = a})
@@ -2358,6 +2399,14 @@ nKind = lens _nKind (\ s a -> s{_nKind = a})
23582399nBody :: Lens' Notification (Maybe Text)
23592400nBody = lens _nBody (\ s a -> s{_nBody = a})
23602401
2402+-- | The list of crm experiment ids.
2403+nCrmExperimentIds :: Lens' Notification [Int64]
2404+nCrmExperimentIds
2405+ = lens _nCrmExperimentIds
2406+ (\ s a -> s{_nCrmExperimentIds = a})
2407+ . _Default
2408+ . _Coerce
2409+
23612410nPcampaignId :: Lens' Notification (Maybe Text)
23622411nPcampaignId
23632412 = lens _nPcampaignId (\ s a -> s{_nPcampaignId = a})
@@ -2386,10 +2435,12 @@ instance FromJSON Notification where
23862435 = withObject "Notification"
23872436 (\ o ->
23882437 Notification' <$>
2389− (o .:? "targetUrl") <*>
2438+ (o .:? "doc_type") <*> (o .:? "targetUrl") <*>
23902439 (o .:? "show_notification_settings_action")
2440+ <*> (o .:? "doc_id")
23912441 <*> (o .:? "kind" .!= "books#notification")
23922442 <*> (o .:? "body")
2443+ <*> (o .:? "crmExperimentIds" .!= mempty)
23932444 <*> (o .:? "pcampaign_id")
23942445 <*> (o .:? "reason")
23952446 <*> (o .:? "dont_show_notification")
@@ -2401,10 +2452,13 @@ instance ToJSON Notification where
24012452 toJSON Notification'{..}
24022453 = object
24032454 (catMaybes
2404− [("targetUrl" .=) <$> _nTargetURL,
2455+ [("doc_type" .=) <$> _nDocType,
2456+ ("targetUrl" .=) <$> _nTargetURL,
24052457 ("show_notification_settings_action" .=) <$>
24062458 _nShowNotificationSettingsAction,
2407− Just ("kind" .= _nKind), ("body" .=) <$> _nBody,
2459+ ("doc_id" .=) <$> _nDocId, Just ("kind" .= _nKind),
2460+ ("body" .=) <$> _nBody,
2461+ ("crmExperimentIds" .=) <$> _nCrmExperimentIds,
24082462 ("pcampaign_id" .=) <$> _nPcampaignId,
24092463 ("reason" .=) <$> _nReason,
24102464 ("dont_show_notification" .=) <$>
@@ -7336,6 +7390,71 @@ instance ToJSON VolumeSaleInfoOffersItemRetailPrice
73367390 [("currencyCode" .=) <$> _vsioirpCurrencyCode,
73377391 ("amountInMicros" .=) <$> _vsioirpAmountInMicros])
73387392
7393+-- | Information on the ability to share with the family.
7394+--
7395+-- /See:/ 'volumeUserInfoFamilySharing' smart constructor.
7396+data VolumeUserInfoFamilySharing = VolumeUserInfoFamilySharing'
7397+ { _vuifsFamilyRole :: !(Maybe Text)
7398+ , _vuifsIsSharingAllowed :: !(Maybe Bool)
7399+ , _vuifsIsSharingDisabledByFop :: !(Maybe Bool)
7400+ } deriving (Eq,Show,Data,Typeable,Generic)
7401+
7402+-- | Creates a value of 'VolumeUserInfoFamilySharing' with the minimum fields required to make a request.
7403+--
7404+-- Use one of the following lenses to modify other fields as desired:
7405+--
7406+-- * 'vuifsFamilyRole'
7407+--
7408+-- * 'vuifsIsSharingAllowed'
7409+--
7410+-- * 'vuifsIsSharingDisabledByFop'
7411+volumeUserInfoFamilySharing
7412+ :: VolumeUserInfoFamilySharing
7413+volumeUserInfoFamilySharing =
7414+ VolumeUserInfoFamilySharing'
7415+ { _vuifsFamilyRole = Nothing
7416+ , _vuifsIsSharingAllowed = Nothing
7417+ , _vuifsIsSharingDisabledByFop = Nothing
7418+ }
7419+
7420+-- | The role of the user in the family.
7421+vuifsFamilyRole :: Lens' VolumeUserInfoFamilySharing (Maybe Text)
7422+vuifsFamilyRole
7423+ = lens _vuifsFamilyRole
7424+ (\ s a -> s{_vuifsFamilyRole = a})
7425+
7426+-- | Whether or not this volume can be shared with the family by the user.
7427+-- This includes sharing eligibility of both the volume and the user. If
7428+-- the value is true, the user can initiate a family sharing action.
7429+vuifsIsSharingAllowed :: Lens' VolumeUserInfoFamilySharing (Maybe Bool)
7430+vuifsIsSharingAllowed
7431+ = lens _vuifsIsSharingAllowed
7432+ (\ s a -> s{_vuifsIsSharingAllowed = a})
7433+
7434+-- | Whether or not sharing this volume is temporarily disabled due to issues
7435+-- with the Family Wallet.
7436+vuifsIsSharingDisabledByFop :: Lens' VolumeUserInfoFamilySharing (Maybe Bool)
7437+vuifsIsSharingDisabledByFop
7438+ = lens _vuifsIsSharingDisabledByFop
7439+ (\ s a -> s{_vuifsIsSharingDisabledByFop = a})
7440+
7441+instance FromJSON VolumeUserInfoFamilySharing where
7442+ parseJSON
7443+ = withObject "VolumeUserInfoFamilySharing"
7444+ (\ o ->
7445+ VolumeUserInfoFamilySharing' <$>
7446+ (o .:? "familyRole") <*> (o .:? "isSharingAllowed")
7447+ <*> (o .:? "isSharingDisabledByFop"))
7448+
7449+instance ToJSON VolumeUserInfoFamilySharing where
7450+ toJSON VolumeUserInfoFamilySharing'{..}
7451+ = object
7452+ (catMaybes
7453+ [("familyRole" .=) <$> _vuifsFamilyRole,
7454+ ("isSharingAllowed" .=) <$> _vuifsIsSharingAllowed,
7455+ ("isSharingDisabledByFop" .=) <$>
7456+ _vuifsIsSharingDisabledByFop])
7457+
73397458--
73407459-- /See:/ 'volumeVolumeInfoIndustryIdentifiersItem' smart constructor.
73417460data VolumeVolumeInfoIndustryIdentifiersItem = VolumeVolumeInfoIndustryIdentifiersItem'