@@ -43,12 +43,14 @@ data Groups = Groups'
4343 , _gIsArchived :: !(Maybe Text)
4444 , _gName :: !(Maybe Text)
4545 , _gMessageDisplayFont :: !(Maybe Text)
46+ , _gIncludeCustomFooter :: !(Maybe Text)
4647 , _gCustomReplyTo :: !(Maybe Text)
4748 , _gWhoCanContactOwner :: !(Maybe Text)
4849 , _gWhoCanAdd :: !(Maybe Text)
4950 , _gWhoCanInvite :: !(Maybe Text)
5051 , _gWhoCanLeaveGroup :: !(Maybe Text)
5152 , _gAllowGoogleCommunication :: !(Maybe Text)
53+ , _gCustomFooterText :: !(Maybe Text)
5254 , _gPrimaryLanguage :: !(Maybe Text)
5355 , _gDescription :: !(Maybe Text)
5456 , _gDefaultMessageDenyNotificationText :: !(Maybe Text)
@@ -97,6 +99,8 @@ data Groups = Groups'
9799--
98100-- * 'gMessageDisplayFont'
99101--
102+-- * 'gIncludeCustomFooter'
103+--
100104-- * 'gCustomReplyTo'
101105--
102106-- * 'gWhoCanContactOwner'
@@ -109,6 +113,8 @@ data Groups = Groups'
109113--
110114-- * 'gAllowGoogleCommunication'
111115--
116+-- * 'gCustomFooterText'
117+--
112118-- * 'gPrimaryLanguage'
113119--
114120-- * 'gDescription'
@@ -139,12 +145,14 @@ groups =
139145 , _gIsArchived = Nothing
140146 , _gName = Nothing
141147 , _gMessageDisplayFont = Nothing
148+ , _gIncludeCustomFooter = Nothing
142149 , _gCustomReplyTo = Nothing
143150 , _gWhoCanContactOwner = Nothing
144151 , _gWhoCanAdd = Nothing
145152 , _gWhoCanInvite = Nothing
146153 , _gWhoCanLeaveGroup = Nothing
147154 , _gAllowGoogleCommunication = Nothing
155+ , _gCustomFooterText = Nothing
148156 , _gPrimaryLanguage = Nothing
149157 , _gDescription = Nothing
150158 , _gDefaultMessageDenyNotificationText = Nothing
@@ -266,6 +274,12 @@ gMessageDisplayFont
266274 = lens _gMessageDisplayFont
267275 (\ s a -> s{_gMessageDisplayFont = a})
268276
277+-- | Whether to include custom footer.
278+gIncludeCustomFooter :: Lens' Groups (Maybe Text)
279+gIncludeCustomFooter
280+ = lens _gIncludeCustomFooter
281+ (\ s a -> s{_gIncludeCustomFooter = a})
282+
269283-- | Default email to which reply to any message should go.
270284gCustomReplyTo :: Lens' Groups (Maybe Text)
271285gCustomReplyTo
@@ -306,6 +320,12 @@ gAllowGoogleCommunication
306320 = lens _gAllowGoogleCommunication
307321 (\ s a -> s{_gAllowGoogleCommunication = a})
308322
323+-- | Custom footer text.
324+gCustomFooterText :: Lens' Groups (Maybe Text)
325+gCustomFooterText
326+ = lens _gCustomFooterText
327+ (\ s a -> s{_gCustomFooterText = a})
328+
309329-- | Primary language for the group.
310330gPrimaryLanguage :: Lens' Groups (Maybe Text)
311331gPrimaryLanguage
@@ -354,12 +374,14 @@ instance FromJSON Groups where
354374 <*> (o .:? "isArchived")
355375 <*> (o .:? "name")
356376 <*> (o .:? "messageDisplayFont")
377+ <*> (o .:? "includeCustomFooter")
357378 <*> (o .:? "customReplyTo")
358379 <*> (o .:? "whoCanContactOwner")
359380 <*> (o .:? "whoCanAdd")
360381 <*> (o .:? "whoCanInvite")
361382 <*> (o .:? "whoCanLeaveGroup")
362383 <*> (o .:? "allowGoogleCommunication")
384+ <*> (o .:? "customFooterText")
363385 <*> (o .:? "primaryLanguage")
364386 <*> (o .:? "description")
365387 <*> (o .:? "defaultMessageDenyNotificationText")
@@ -395,6 +417,7 @@ instance ToJSON Groups where
395417 ("isArchived" .=) <$> _gIsArchived,
396418 ("name" .=) <$> _gName,
397419 ("messageDisplayFont" .=) <$> _gMessageDisplayFont,
420+ ("includeCustomFooter" .=) <$> _gIncludeCustomFooter,
398421 ("customReplyTo" .=) <$> _gCustomReplyTo,
399422 ("whoCanContactOwner" .=) <$> _gWhoCanContactOwner,
400423 ("whoCanAdd" .=) <$> _gWhoCanAdd,
@@ -402,6 +425,7 @@ instance ToJSON Groups where
402425 ("whoCanLeaveGroup" .=) <$> _gWhoCanLeaveGroup,
403426 ("allowGoogleCommunication" .=) <$>
404427 _gAllowGoogleCommunication,
428+ ("customFooterText" .=) <$> _gCustomFooterText,
405429 ("primaryLanguage" .=) <$> _gPrimaryLanguage,
406430 ("description" .=) <$> _gDescription,
407431 ("defaultMessageDenyNotificationText" .=) <$>