packages feed

gogol-civicinfo 0.4.0 → 0.5.0

raw patch · 8 files changed

+330/−208 lines, 8 filesdep ~gogol-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: gogol-core

API changes (from Hackage documentation)

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.3.0`+`0.5.0`   ## Description
gen/Network/Google/CivicInfo/Types/Product.hs view
@@ -23,10 +23,13 @@ -- | Political geographic divisions that contain the requested address. -- -- /See:/ 'representativeInfoResponseDivisions' smart constructor.-newtype RepresentativeInfoResponseDivisions = RepresentativeInfoResponseDivisions'+newtype RepresentativeInfoResponseDivisions =+  RepresentativeInfoResponseDivisions'     { _rirdAddtional :: HashMap Text GeographicDivision-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RepresentativeInfoResponseDivisions' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -36,10 +39,10 @@     :: HashMap Text GeographicDivision -- ^ 'rirdAddtional'     -> RepresentativeInfoResponseDivisions representativeInfoResponseDivisions pRirdAddtional_ =-    RepresentativeInfoResponseDivisions'-    { _rirdAddtional = _Coerce # pRirdAddtional_-    }+  RepresentativeInfoResponseDivisions'+    {_rirdAddtional = _Coerce # pRirdAddtional_} + -- | The unique Open Civic Data identifier for this division. rirdAddtional :: Lens' RepresentativeInfoResponseDivisions (HashMap Text GeographicDivision) rirdAddtional@@ -62,7 +65,8 @@ -- | The result of a voter info lookup query. -- -- /See:/ 'voterInfoResponse' smart constructor.-data VoterInfoResponse = VoterInfoResponse'+data VoterInfoResponse =+  VoterInfoResponse'     { _virOtherElections   :: !(Maybe [Election])     , _virContests         :: !(Maybe [Contest])     , _virState            :: !(Maybe [AdministrationRegion])@@ -75,8 +79,10 @@     , _virEarlyVoteSites   :: !(Maybe [PollingLocation])     , _virPollingLocations :: !(Maybe [PollingLocation])     , _virPrecinctId       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'VoterInfoResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -107,7 +113,7 @@ voterInfoResponse     :: VoterInfoResponse voterInfoResponse =-    VoterInfoResponse'+  VoterInfoResponse'     { _virOtherElections = Nothing     , _virContests = Nothing     , _virState = Nothing@@ -122,6 +128,7 @@     , _virPrecinctId = Nothing     } + -- | When there are multiple elections for a voter address, the -- otherElections field is populated in the API response and there are two -- possibilities: 1. If the earliest election is not the intended election,@@ -257,7 +264,8 @@ -- ballot. -- -- /See:/ 'pollingLocation' smart constructor.-data PollingLocation = PollingLocation'+data PollingLocation =+  PollingLocation'     { _plVoterServices :: !(Maybe Text)     , _plLatitude      :: !(Maybe (Textual Double))     , _plEndDate       :: !(Maybe Text)@@ -269,8 +277,10 @@     , _plId            :: !(Maybe Text)     , _plNotes         :: !(Maybe Text)     , _plLongitude     :: !(Maybe (Textual Double))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PollingLocation' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -299,7 +309,7 @@ pollingLocation     :: PollingLocation pollingLocation =-    PollingLocation'+  PollingLocation'     { _plVoterServices = Nothing     , _plLatitude = Nothing     , _plEndDate = Nothing@@ -313,6 +323,7 @@     , _plLongitude = Nothing     } + -- | The services provided by this early vote site or drop off location. This -- field is not populated for polling locations. plVoterServices :: Lens' PollingLocation (Maybe Text)@@ -418,12 +429,15 @@ -- | Describes a political geography. -- -- /See:/ 'geographicDivision' smart constructor.-data GeographicDivision = GeographicDivision'+data GeographicDivision =+  GeographicDivision'     { _gdName          :: !(Maybe Text)     , _gdOfficeIndices :: !(Maybe [Textual Word32])     , _gdAlsoKnownAs   :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GeographicDivision' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -436,12 +450,10 @@ geographicDivision     :: GeographicDivision geographicDivision =-    GeographicDivision'-    { _gdName = Nothing-    , _gdOfficeIndices = Nothing-    , _gdAlsoKnownAs = Nothing-    }+  GeographicDivision'+    {_gdName = Nothing, _gdOfficeIndices = Nothing, _gdAlsoKnownAs = Nothing} + -- | The name of the division. gdName :: Lens' GeographicDivision (Maybe Text) gdName = lens _gdName (\ s a -> s{_gdName = a})@@ -490,7 +502,8 @@  -- -- /See:/ 'streetSegment' smart constructor.-data StreetSegment = StreetSegment'+data StreetSegment =+  StreetSegment'     { _ssOriginalId                    :: !(Maybe Text)     , _ssPollinglocationByIds          :: !(Maybe [Text])     , _ssStartHouseNumber              :: !(Maybe (Textual Int64))@@ -536,8 +549,10 @@     , _ssPrecinctName                  :: !(Maybe Text)     , _ssCountyFips                    :: !(Maybe Text)     , _ssPrecinctOcdId                 :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StreetSegment' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -634,7 +649,7 @@ streetSegment     :: StreetSegment streetSegment =-    StreetSegment'+  StreetSegment'     { _ssOriginalId = Nothing     , _ssPollinglocationByIds = Nothing     , _ssStartHouseNumber = Nothing@@ -682,6 +697,7 @@     , _ssPrecinctOcdId = Nothing     } + ssOriginalId :: Lens' StreetSegment (Maybe Text) ssOriginalId   = lens _ssOriginalId (\ s a -> s{_ssOriginalId = a})@@ -1023,7 +1039,8 @@ -- | Information about a candidate running for elected office. -- -- /See:/ 'candidate' smart constructor.-data Candidate = Candidate'+data Candidate =+  Candidate'     { _cEmail         :: !(Maybe Text)     , _cPhone         :: !(Maybe Text)     , _cPhotoURL      :: !(Maybe Text)@@ -1032,8 +1049,10 @@     , _cOrderOnBallot :: !(Maybe (Textual Int64))     , _cName          :: !(Maybe Text)     , _cParty         :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Candidate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1056,7 +1075,7 @@ candidate     :: Candidate candidate =-    Candidate'+  Candidate'     { _cEmail = Nothing     , _cPhone = Nothing     , _cPhotoURL = Nothing@@ -1067,6 +1086,7 @@     , _cParty = Nothing     } + -- | The email address for the candidate\'s campaign. cEmail :: Lens' Candidate (Maybe Text) cEmail = lens _cEmail (\ s a -> s{_cEmail = a})@@ -1138,15 +1158,18 @@ -- | Information about an Office held by one or more Officials. -- -- /See:/ 'office' smart constructor.-data Office = Office'+data Office =+  Office'     { _oDivisionId      :: !(Maybe Text)     , _oRoles           :: !(Maybe [Text])     , _oOfficialIndices :: !(Maybe [Textual Word32])     , _oSources         :: !(Maybe [Source])     , _oName            :: !(Maybe Text)     , _oLevels          :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Office' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1165,7 +1188,7 @@ office     :: Office office =-    Office'+  Office'     { _oDivisionId = Nothing     , _oRoles = Nothing     , _oOfficialIndices = Nothing@@ -1174,6 +1197,7 @@     , _oLevels = Nothing     } + -- | The OCD ID of the division with which this office is associated. oDivisionId :: Lens' Office (Maybe Text) oDivisionId@@ -1242,10 +1266,13 @@  -- -- /See:/ 'streetSegmentList' smart constructor.-newtype StreetSegmentList = StreetSegmentList'+newtype StreetSegmentList =+  StreetSegmentList'     { _sslSegments :: Maybe [StreetSegment]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StreetSegmentList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1253,11 +1280,9 @@ -- * 'sslSegments' streetSegmentList     :: StreetSegmentList-streetSegmentList =-    StreetSegmentList'-    { _sslSegments = Nothing-    }+streetSegmentList = StreetSegmentList' {_sslSegments = Nothing} + sslSegments :: Lens' StreetSegmentList [StreetSegment] sslSegments   = lens _sslSegments (\ s a -> s{_sslSegments = a}) .@@ -1277,7 +1302,8 @@  -- -- /See:/ 'livegraphBacktraceRecordInfo' smart constructor.-data LivegraphBacktraceRecordInfo = LivegraphBacktraceRecordInfo'+data LivegraphBacktraceRecordInfo =+  LivegraphBacktraceRecordInfo'     { _lbriDataSourcePublishMsec :: !(Maybe (Textual Int64))     , _lbriTopicBuildStartMsec   :: !(Maybe (Textual Int64))     , _lbriIsRecon               :: !(Maybe Bool)@@ -1294,8 +1320,10 @@     , _lbriIsWlmThrottled        :: !(Maybe Bool)     , _lbriExpId                 :: !(Maybe Text)     , _lbriSubscriberReceiveMsec :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'LivegraphBacktraceRecordInfo' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1334,7 +1362,7 @@ livegraphBacktraceRecordInfo     :: LivegraphBacktraceRecordInfo livegraphBacktraceRecordInfo =-    LivegraphBacktraceRecordInfo'+  LivegraphBacktraceRecordInfo'     { _lbriDataSourcePublishMsec = Nothing     , _lbriTopicBuildStartMsec = Nothing     , _lbriIsRecon = Nothing@@ -1353,6 +1381,7 @@     , _lbriSubscriberReceiveMsec = Nothing     } + lbriDataSourcePublishMsec :: Lens' LivegraphBacktraceRecordInfo (Maybe Int64) lbriDataSourcePublishMsec   = lens _lbriDataSourcePublishMsec@@ -1483,10 +1512,13 @@  -- -- /See:/ 'electionsQueryRequest' smart constructor.-newtype ElectionsQueryRequest = ElectionsQueryRequest'+newtype ElectionsQueryRequest =+  ElectionsQueryRequest'     { _eqrContextParams :: Maybe ContextParams-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ElectionsQueryRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1494,11 +1526,9 @@ -- * 'eqrContextParams' electionsQueryRequest     :: ElectionsQueryRequest-electionsQueryRequest =-    ElectionsQueryRequest'-    { _eqrContextParams = Nothing-    }+electionsQueryRequest = ElectionsQueryRequest' {_eqrContextParams = Nothing} + eqrContextParams :: Lens' ElectionsQueryRequest (Maybe ContextParams) eqrContextParams   = lens _eqrContextParams@@ -1519,11 +1549,14 @@ -- | A social media or web channel for a candidate. -- -- /See:/ 'channel' smart constructor.-data Channel = Channel'+data Channel =+  Channel'     { _cId   :: !(Maybe Text)     , _cType :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Channel' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1533,12 +1566,9 @@ -- * 'cType' channel     :: Channel-channel =-    Channel'-    { _cId = Nothing-    , _cType = Nothing-    }+channel = Channel' {_cId = Nothing, _cType = Nothing} + -- | The unique public identifier for the candidate\'s channel. cId :: Lens' Channel (Maybe Text) cId = lens _cId (\ s a -> s{_cId = a})@@ -1563,13 +1593,16 @@ -- | Information about the election that was queried. -- -- /See:/ 'election' smart constructor.-data Election = Election'+data Election =+  Election'     { _eOcdDivisionId :: !(Maybe Text)     , _eElectionDay   :: !(Maybe Text)     , _eName          :: !(Maybe Text)     , _eId            :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Election' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1584,13 +1617,14 @@ election     :: Election election =-    Election'+  Election'     { _eOcdDivisionId = Nothing     , _eElectionDay = Nothing     , _eName = Nothing     , _eId = Nothing     } + -- | The political division of the election. Represented as an OCD Division -- ID. Voters within these political jurisdictions are covered by this -- election. This is typically a state such as@@ -1635,14 +1669,17 @@ -- | The result of a representative info lookup query. -- -- /See:/ 'representativeInfoResponse' smart constructor.-data RepresentativeInfoResponse = RepresentativeInfoResponse'+data RepresentativeInfoResponse =+  RepresentativeInfoResponse'     { _rirKind            :: !Text     , _rirNormalizedInput :: !(Maybe SimpleAddressType)     , _rirOfficials       :: !(Maybe [Official])     , _rirDivisions       :: !(Maybe RepresentativeInfoResponseDivisions)     , _rirOffices         :: !(Maybe [Office])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RepresentativeInfoResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1659,7 +1696,7 @@ representativeInfoResponse     :: RepresentativeInfoResponse representativeInfoResponse =-    RepresentativeInfoResponse'+  RepresentativeInfoResponse'     { _rirKind = "civicinfo#representativeInfoResponse"     , _rirNormalizedInput = Nothing     , _rirOfficials = Nothing@@ -1667,6 +1704,7 @@     , _rirOffices = Nothing     } + -- | Identifies what kind of resource this is. Value: the fixed string -- \"civicinfo#representativeInfoResponse\". rirKind :: Lens' RepresentativeInfoResponse Text@@ -1723,13 +1761,16 @@  -- -- /See:/ 'voterInfoSegmentResult' smart constructor.-data VoterInfoSegmentResult = VoterInfoSegmentResult'+data VoterInfoSegmentResult =+  VoterInfoSegmentResult'     { _visrResponse        :: !(Maybe VoterInfoResponse)     , _visrGeneratedMillis :: !(Maybe (Textual Int64))     , _visrPostalAddress   :: !(Maybe PostalAddress)     , _visrRequest         :: !(Maybe VoterInfoRequest)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'VoterInfoSegmentResult' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1744,13 +1785,14 @@ voterInfoSegmentResult     :: VoterInfoSegmentResult voterInfoSegmentResult =-    VoterInfoSegmentResult'+  VoterInfoSegmentResult'     { _visrResponse = Nothing     , _visrGeneratedMillis = Nothing     , _visrPostalAddress = Nothing     , _visrRequest = Nothing     } + visrResponse :: Lens' VoterInfoSegmentResult (Maybe VoterInfoResponse) visrResponse   = lens _visrResponse (\ s a -> s{_visrResponse = a})@@ -1792,12 +1834,15 @@ -- query. -- -- /See:/ 'divisionSearchResult' smart constructor.-data DivisionSearchResult = DivisionSearchResult'+data DivisionSearchResult =+  DivisionSearchResult'     { _dsrAliases :: !(Maybe [Text])     , _dsrName    :: !(Maybe Text)     , _dsrOcdId   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DivisionSearchResult' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1810,12 +1855,10 @@ divisionSearchResult     :: DivisionSearchResult divisionSearchResult =-    DivisionSearchResult'-    { _dsrAliases = Nothing-    , _dsrName = Nothing-    , _dsrOcdId = Nothing-    }+  DivisionSearchResult'+    {_dsrAliases = Nothing, _dsrName = Nothing, _dsrOcdId = Nothing} + -- | Other Open Civic Data identifiers that refer to the same division -- for -- example, those that refer to other political divisions whose boundaries -- are defined to be coterminous with this one. For example,@@ -1855,10 +1898,13 @@ -- | A search request for political geographies. -- -- /See:/ 'divisionSearchRequest' smart constructor.-newtype DivisionSearchRequest = DivisionSearchRequest'+newtype DivisionSearchRequest =+  DivisionSearchRequest'     { _dsrContextParams :: Maybe ContextParams-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DivisionSearchRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1866,11 +1912,9 @@ -- * 'dsrContextParams' divisionSearchRequest     :: DivisionSearchRequest-divisionSearchRequest =-    DivisionSearchRequest'-    { _dsrContextParams = Nothing-    }+divisionSearchRequest = DivisionSearchRequest' {_dsrContextParams = Nothing} + dsrContextParams :: Lens' DivisionSearchRequest (Maybe ContextParams) dsrContextParams   = lens _dsrContextParams@@ -1890,10 +1934,13 @@  -- -- /See:/ 'fieldMetadataProto' smart constructor.-newtype FieldMetadataProto = FieldMetadataProto'+newtype FieldMetadataProto =+  FieldMetadataProto'     { _fmpInternal :: Maybe InternalFieldMetadataProto-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'FieldMetadataProto' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1901,11 +1948,9 @@ -- * 'fmpInternal' fieldMetadataProto     :: FieldMetadataProto-fieldMetadataProto =-    FieldMetadataProto'-    { _fmpInternal = Nothing-    }+fieldMetadataProto = FieldMetadataProto' {_fmpInternal = Nothing} + fmpInternal :: Lens' FieldMetadataProto (Maybe InternalFieldMetadataProto) fmpInternal   = lens _fmpInternal (\ s a -> s{_fmpInternal = a})@@ -1922,10 +1967,13 @@  -- -- /See:/ 'messageSet' smart constructor.-newtype MessageSet = MessageSet'+newtype MessageSet =+  MessageSet'     { _msRecordMessageSetExt :: Maybe LivegraphBacktraceRecordInfo-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MessageSet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1933,11 +1981,9 @@ -- * 'msRecordMessageSetExt' messageSet     :: MessageSet-messageSet =-    MessageSet'-    { _msRecordMessageSetExt = Nothing-    }+messageSet = MessageSet' {_msRecordMessageSetExt = Nothing} + msRecordMessageSetExt :: Lens' MessageSet (Maybe LivegraphBacktraceRecordInfo) msRecordMessageSetExt   = lens _msRecordMessageSetExt@@ -1960,7 +2006,8 @@ -- Elections). -- -- /See:/ 'administrativeBody' smart constructor.-data AdministrativeBody = AdministrativeBody'+data AdministrativeBody =+  AdministrativeBody'     { _abCorrespondenceAddress               :: !(Maybe SimpleAddressType)     , _abAbsenteeVotingInfoURL               :: !(Maybe Text)     , _abHoursOfOperation                    :: !(Maybe Text)@@ -1975,8 +2022,10 @@     , _abAddressLines                        :: !(Maybe [Text])     , _abVoterServices                       :: !(Maybe [Text])     , _abElectionRegistrationURL             :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdministrativeBody' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2011,7 +2060,7 @@ administrativeBody     :: AdministrativeBody administrativeBody =-    AdministrativeBody'+  AdministrativeBody'     { _abCorrespondenceAddress = Nothing     , _abAbsenteeVotingInfoURL = Nothing     , _abHoursOfOperation = Nothing@@ -2028,6 +2077,7 @@     , _abElectionRegistrationURL = Nothing     } + -- | The mailing address of this administrative body. abCorrespondenceAddress :: Lens' AdministrativeBody (Maybe SimpleAddressType) abCorrespondenceAddress@@ -2170,10 +2220,13 @@ -- address. -- -- /See:/ 'representativeInfoRequest' smart constructor.-newtype RepresentativeInfoRequest = RepresentativeInfoRequest'+newtype RepresentativeInfoRequest =+  RepresentativeInfoRequest'     { _rirContextParams :: Maybe ContextParams-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RepresentativeInfoRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2182,10 +2235,9 @@ representativeInfoRequest     :: RepresentativeInfoRequest representativeInfoRequest =-    RepresentativeInfoRequest'-    { _rirContextParams = Nothing-    }+  RepresentativeInfoRequest' {_rirContextParams = Nothing} + rirContextParams :: Lens' RepresentativeInfoRequest (Maybe ContextParams) rirContextParams   = lens _rirContextParams@@ -2207,7 +2259,8 @@ -- | Information about a contest that appears on a voter\'s ballot. -- -- /See:/ 'contest' smart constructor.-data Contest = Contest'+data Contest =+  Contest'     { _conReferendumPassageThreshold :: !(Maybe Text)     , _conRoles                      :: !(Maybe [Text])     , _conReferendumURL              :: !(Maybe Text)@@ -2233,8 +2286,10 @@     , _conCandidates                 :: !(Maybe [Candidate])     , _conReferendumTitle            :: !(Maybe Text)     , _conBallotPlacement            :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Contest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2291,7 +2346,7 @@ contest     :: Contest contest =-    Contest'+  Contest'     { _conReferendumPassageThreshold = Nothing     , _conRoles = Nothing     , _conReferendumURL = Nothing@@ -2319,6 +2374,7 @@     , _conBallotPlacement = Nothing     } + -- | The threshold of votes that the referendum needs in order to pass, e.g. -- \"two-thirds\". This field is only populated for contests of type -- \'Referendum\'.@@ -2570,11 +2626,14 @@ -- | The result of a division search query. -- -- /See:/ 'divisionSearchResponse' smart constructor.-data DivisionSearchResponse = DivisionSearchResponse'+data DivisionSearchResponse =+  DivisionSearchResponse'     { _dsrResults :: !(Maybe [DivisionSearchResult])     , _dsrKind    :: !Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DivisionSearchResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2585,11 +2644,10 @@ divisionSearchResponse     :: DivisionSearchResponse divisionSearchResponse =-    DivisionSearchResponse'-    { _dsrResults = Nothing-    , _dsrKind = "civicinfo#divisionSearchResponse"-    }+  DivisionSearchResponse'+    {_dsrResults = Nothing, _dsrKind = "civicinfo#divisionSearchResponse"} + dsrResults :: Lens' DivisionSearchResponse [DivisionSearchResult] dsrResults   = lens _dsrResults (\ s a -> s{_dsrResults = a}) .@@ -2620,10 +2678,13 @@ -- | Political geographic divisions that contain the requested address. -- -- /See:/ 'representativeInfoDataDivisions' smart constructor.-newtype RepresentativeInfoDataDivisions = RepresentativeInfoDataDivisions'+newtype RepresentativeInfoDataDivisions =+  RepresentativeInfoDataDivisions'     { _riddAddtional :: HashMap Text GeographicDivision-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RepresentativeInfoDataDivisions' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2633,10 +2694,9 @@     :: HashMap Text GeographicDivision -- ^ 'riddAddtional'     -> RepresentativeInfoDataDivisions representativeInfoDataDivisions pRiddAddtional_ =-    RepresentativeInfoDataDivisions'-    { _riddAddtional = _Coerce # pRiddAddtional_-    }+  RepresentativeInfoDataDivisions' {_riddAddtional = _Coerce # pRiddAddtional_} + -- | The unique Open Civic Data identifier for this division. riddAddtional :: Lens' RepresentativeInfoDataDivisions (HashMap Text GeographicDivision) riddAddtional@@ -2658,14 +2718,17 @@ -- | Information about individual election officials. -- -- /See:/ 'electionOfficial' smart constructor.-data ElectionOfficial = ElectionOfficial'+data ElectionOfficial =+  ElectionOfficial'     { _eoFaxNumber         :: !(Maybe Text)     , _eoName              :: !(Maybe Text)     , _eoOfficePhoneNumber :: !(Maybe Text)     , _eoEmailAddress      :: !(Maybe Text)     , _eoTitle             :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ElectionOfficial' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2682,7 +2745,7 @@ electionOfficial     :: ElectionOfficial electionOfficial =-    ElectionOfficial'+  ElectionOfficial'     { _eoFaxNumber = Nothing     , _eoName = Nothing     , _eoOfficePhoneNumber = Nothing@@ -2690,6 +2753,7 @@     , _eoTitle = Nothing     } + -- | The fax number of the election official. eoFaxNumber :: Lens' ElectionOfficial (Maybe Text) eoFaxNumber@@ -2737,13 +2801,16 @@  -- -- /See:/ 'pointProto' smart constructor.-data PointProto = PointProto'+data PointProto =+  PointProto'     { _ppLatE7         :: !(Maybe (Textual Word32))     , _ppLngE7         :: !(Maybe (Textual Word32))     , _ppMetadata      :: !(Maybe FieldMetadataProto)     , _ppTemporaryData :: !(Maybe MessageSet)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PointProto' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2758,13 +2825,14 @@ pointProto     :: PointProto pointProto =-    PointProto'+  PointProto'     { _ppLatE7 = Nothing     , _ppLngE7 = Nothing     , _ppMetadata = Nothing     , _ppTemporaryData = Nothing     } + ppLatE7 :: Lens' PointProto (Maybe Word32) ppLatE7   = lens _ppLatE7 (\ s a -> s{_ppLatE7 = a}) .@@ -2804,12 +2872,15 @@  -- -- /See:/ 'representativeInfoData' smart constructor.-data RepresentativeInfoData = RepresentativeInfoData'+data RepresentativeInfoData =+  RepresentativeInfoData'     { _ridOfficials :: !(Maybe [Official])     , _ridDivisions :: !(Maybe RepresentativeInfoDataDivisions)     , _ridOffices   :: !(Maybe [Office])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RepresentativeInfoData' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2822,12 +2893,10 @@ representativeInfoData     :: RepresentativeInfoData representativeInfoData =-    RepresentativeInfoData'-    { _ridOfficials = Nothing-    , _ridDivisions = Nothing-    , _ridOffices = Nothing-    }+  RepresentativeInfoData'+    {_ridOfficials = Nothing, _ridDivisions = Nothing, _ridOffices = Nothing} + -- | Officials holding the offices listed above. Will only be present if -- includeOffices was true in the request. ridOfficials :: Lens' RepresentativeInfoData [Official]@@ -2870,11 +2939,14 @@ -- it. -- -- /See:/ 'source' smart constructor.-data Source = Source'+data Source =+  Source'     { _sName     :: !(Maybe Text)     , _sOfficial :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Source' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2884,12 +2956,9 @@ -- * 'sOfficial' source     :: Source-source =-    Source'-    { _sName = Nothing-    , _sOfficial = Nothing-    }+source = Source' {_sName = Nothing, _sOfficial = Nothing} + -- | The name of the data source. sName :: Lens' Source (Maybe Text) sName = lens _sName (\ s a -> s{_sName = a})@@ -2915,10 +2984,13 @@ -- | A request to look up representative information for a single division. -- -- /See:/ 'divisionRepresentativeInfoRequest' smart constructor.-newtype DivisionRepresentativeInfoRequest = DivisionRepresentativeInfoRequest'+newtype DivisionRepresentativeInfoRequest =+  DivisionRepresentativeInfoRequest'     { _drirContextParams :: Maybe ContextParams-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DivisionRepresentativeInfoRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2927,10 +2999,9 @@ divisionRepresentativeInfoRequest     :: DivisionRepresentativeInfoRequest divisionRepresentativeInfoRequest =-    DivisionRepresentativeInfoRequest'-    { _drirContextParams = Nothing-    }+  DivisionRepresentativeInfoRequest' {_drirContextParams = Nothing} + drirContextParams :: Lens' DivisionRepresentativeInfoRequest (Maybe ContextParams) drirContextParams   = lens _drirContextParams@@ -2954,13 +3025,16 @@ -- | Describes the geographic scope of a contest. -- -- /See:/ 'electoralDistrict' smart constructor.-data ElectoralDistrict = ElectoralDistrict'+data ElectoralDistrict =+  ElectoralDistrict'     { _edKgForeignKey :: !(Maybe Text)     , _edName         :: !(Maybe Text)     , _edScope        :: !(Maybe Text)     , _edId           :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ElectoralDistrict' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2975,13 +3049,14 @@ electoralDistrict     :: ElectoralDistrict electoralDistrict =-    ElectoralDistrict'+  ElectoralDistrict'     { _edKgForeignKey = Nothing     , _edName = Nothing     , _edScope = Nothing     , _edId = Nothing     } + edKgForeignKey :: Lens' ElectoralDistrict (Maybe Text) edKgForeignKey   = lens _edKgForeignKey@@ -3024,11 +3099,14 @@ -- | A request for information about a voter. -- -- /See:/ 'voterInfoRequest' smart constructor.-data VoterInfoRequest = VoterInfoRequest'+data VoterInfoRequest =+  VoterInfoRequest'     { _virVoterInfoSegmentResult :: !(Maybe VoterInfoSegmentResult)     , _virContextParams          :: !(Maybe ContextParams)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'VoterInfoRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3039,11 +3117,10 @@ voterInfoRequest     :: VoterInfoRequest voterInfoRequest =-    VoterInfoRequest'-    { _virVoterInfoSegmentResult = Nothing-    , _virContextParams = Nothing-    }+  VoterInfoRequest'+    {_virVoterInfoSegmentResult = Nothing, _virContextParams = Nothing} + virVoterInfoSegmentResult :: Lens' VoterInfoRequest (Maybe VoterInfoSegmentResult) virVoterInfoSegmentResult   = lens _virVoterInfoSegmentResult@@ -3073,7 +3150,8 @@ -- | A simple representation of an address. -- -- /See:/ 'simpleAddressType' smart constructor.-data SimpleAddressType = SimpleAddressType'+data SimpleAddressType =+  SimpleAddressType'     { _satLine2        :: !(Maybe Text)     , _satState        :: !(Maybe Text)     , _satLine3        :: !(Maybe Text)@@ -3081,8 +3159,10 @@     , _satCity         :: !(Maybe Text)     , _satLine1        :: !(Maybe Text)     , _satLocationName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'SimpleAddressType' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3103,7 +3183,7 @@ simpleAddressType     :: SimpleAddressType simpleAddressType =-    SimpleAddressType'+  SimpleAddressType'     { _satLine2 = Nothing     , _satState = Nothing     , _satLine3 = Nothing@@ -3113,6 +3193,7 @@     , _satLocationName = Nothing     } + -- | The second line the address, if needed. satLine2 :: Lens' SimpleAddressType (Maybe Text) satLine2 = lens _satLine2 (\ s a -> s{_satLine2 = a})@@ -3167,11 +3248,14 @@  -- -- /See:/ 'internalSourceSummaryProto' smart constructor.-data InternalSourceSummaryProto = InternalSourceSummaryProto'+data InternalSourceSummaryProto =+  InternalSourceSummaryProto'     { _isspDataSet  :: !(Maybe Text)     , _isspProvider :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'InternalSourceSummaryProto' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3182,11 +3266,9 @@ internalSourceSummaryProto     :: InternalSourceSummaryProto internalSourceSummaryProto =-    InternalSourceSummaryProto'-    { _isspDataSet = Nothing-    , _isspProvider = Nothing-    }+  InternalSourceSummaryProto' {_isspDataSet = Nothing, _isspProvider = Nothing} + isspDataSet :: Lens' InternalSourceSummaryProto (Maybe Text) isspDataSet   = lens _isspDataSet (\ s a -> s{_isspDataSet = a})@@ -3211,10 +3293,13 @@  -- -- /See:/ 'livegraphBacktraceRecordInfoExpInfo' smart constructor.-newtype LivegraphBacktraceRecordInfoExpInfo = LivegraphBacktraceRecordInfoExpInfo'+newtype LivegraphBacktraceRecordInfoExpInfo =+  LivegraphBacktraceRecordInfoExpInfo'     { _lbrieiDeletedIns :: Maybe [Text]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'LivegraphBacktraceRecordInfoExpInfo' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3223,10 +3308,9 @@ livegraphBacktraceRecordInfoExpInfo     :: LivegraphBacktraceRecordInfoExpInfo livegraphBacktraceRecordInfoExpInfo =-    LivegraphBacktraceRecordInfoExpInfo'-    { _lbrieiDeletedIns = Nothing-    }+  LivegraphBacktraceRecordInfoExpInfo' {_lbrieiDeletedIns = Nothing} + lbrieiDeletedIns :: Lens' LivegraphBacktraceRecordInfoExpInfo [Text] lbrieiDeletedIns   = lens _lbrieiDeletedIns@@ -3250,10 +3334,13 @@  -- -- /See:/ 'contextParams' smart constructor.-newtype ContextParams = ContextParams'+newtype ContextParams =+  ContextParams'     { _cpClientProFile :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ContextParams' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3261,11 +3348,9 @@ -- * 'cpClientProFile' contextParams     :: ContextParams-contextParams =-    ContextParams'-    { _cpClientProFile = Nothing-    }+contextParams = ContextParams' {_cpClientProFile = Nothing} + cpClientProFile :: Lens' ContextParams (Maybe Text) cpClientProFile   = lens _cpClientProFile@@ -3284,7 +3369,8 @@  -- -- /See:/ 'postalAddress' smart constructor.-data PostalAddress = PostalAddress'+data PostalAddress =+  PostalAddress'     { _paAdministrativeAreaName    :: !(Maybe Text)     , _paRecipientName             :: !(Maybe Text)     , _paLanguageCode              :: !(Maybe Text)@@ -3305,8 +3391,10 @@     , _paPostalCodeNumber          :: !(Maybe Text)     , _paThoroughfareName          :: !(Maybe Text)     , _paSubPremiseName            :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PostalAddress' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3353,7 +3441,7 @@ postalAddress     :: PostalAddress postalAddress =-    PostalAddress'+  PostalAddress'     { _paAdministrativeAreaName = Nothing     , _paRecipientName = Nothing     , _paLanguageCode = Nothing@@ -3376,6 +3464,7 @@     , _paSubPremiseName = Nothing     } + paAdministrativeAreaName :: Lens' PostalAddress (Maybe Text) paAdministrativeAreaName   = lens _paAdministrativeAreaName@@ -3534,11 +3623,14 @@  -- -- /See:/ 'internalFieldMetadataProto' smart constructor.-data InternalFieldMetadataProto = InternalFieldMetadataProto'+data InternalFieldMetadataProto =+  InternalFieldMetadataProto'     { _ifmpSourceSummary :: !(Maybe InternalSourceSummaryProto)     , _ifmpIsAuto        :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'InternalFieldMetadataProto' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3549,11 +3641,10 @@ internalFieldMetadataProto     :: InternalFieldMetadataProto internalFieldMetadataProto =-    InternalFieldMetadataProto'-    { _ifmpSourceSummary = Nothing-    , _ifmpIsAuto = Nothing-    }+  InternalFieldMetadataProto'+    {_ifmpSourceSummary = Nothing, _ifmpIsAuto = Nothing} + ifmpSourceSummary :: Lens' InternalFieldMetadataProto (Maybe InternalSourceSummaryProto) ifmpSourceSummary   = lens _ifmpSourceSummary@@ -3580,14 +3671,17 @@ -- | Describes information about a regional election administrative area. -- -- /See:/ 'administrationRegion' smart constructor.-data AdministrationRegion = AdministrationRegion'+data AdministrationRegion =+  AdministrationRegion'     { _arLocalJurisdiction          :: !(Maybe AdministrationRegion)     , _arSources                    :: !(Maybe [Source])     , _arName                       :: !(Maybe Text)     , _arElectionAdministrationBody :: !(Maybe AdministrativeBody)     , _arId                         :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdministrationRegion' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3604,7 +3698,7 @@ administrationRegion     :: AdministrationRegion administrationRegion =-    AdministrationRegion'+  AdministrationRegion'     { _arLocalJurisdiction = Nothing     , _arSources = Nothing     , _arName = Nothing@@ -3612,6 +3706,7 @@     , _arId = Nothing     } + -- | The city or county that provides election information for this voter. -- This object can have the same elements as state. arLocalJurisdiction :: Lens' AdministrationRegion (Maybe AdministrationRegion)@@ -3667,7 +3762,8 @@  -- -- /See:/ 'provenance' smart constructor.-data Provenance = Provenance'+data Provenance =+  Provenance'     { _pTsStreetSegmentId     :: !(Maybe Text)     , _pVIPStreetSegmentId    :: !(Maybe (Textual Int64))     , _pCollidedSegmentSource :: !(Maybe StreetSegmentList)@@ -3678,8 +3774,10 @@     , _pVIP5PrecinctId        :: !(Maybe Text)     , _pPrecinctSplitId       :: !(Maybe (Textual Int64))     , _pPrecinctId            :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Provenance' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3706,7 +3804,7 @@ provenance     :: Provenance provenance =-    Provenance'+  Provenance'     { _pTsStreetSegmentId = Nothing     , _pVIPStreetSegmentId = Nothing     , _pCollidedSegmentSource = Nothing@@ -3719,6 +3817,7 @@     , _pPrecinctId = Nothing     } + pTsStreetSegmentId :: Lens' Provenance (Maybe Text) pTsStreetSegmentId   = lens _pTsStreetSegmentId@@ -3806,11 +3905,14 @@ -- | The list of elections available for this version of the API. -- -- /See:/ 'electionsQueryResponse' smart constructor.-data ElectionsQueryResponse = ElectionsQueryResponse'+data ElectionsQueryResponse =+  ElectionsQueryResponse'     { _eqrKind      :: !Text     , _eqrElections :: !(Maybe [Election])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ElectionsQueryResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3821,11 +3923,10 @@ electionsQueryResponse     :: ElectionsQueryResponse electionsQueryResponse =-    ElectionsQueryResponse'-    { _eqrKind = "civicinfo#electionsQueryResponse"-    , _eqrElections = Nothing-    }+  ElectionsQueryResponse'+    {_eqrKind = "civicinfo#electionsQueryResponse", _eqrElections = Nothing} + -- | Identifies what kind of resource this is. Value: the fixed string -- \"civicinfo#electionsQueryResponse\". eqrKind :: Lens' ElectionsQueryResponse Text@@ -3856,7 +3957,8 @@ -- | Information about a person holding an elected office. -- -- /See:/ 'official' smart constructor.-data Official = Official'+data Official =+  Official'     { _offPhotoURL :: !(Maybe Text)     , _offURLs     :: !(Maybe [Text])     , _offChannels :: !(Maybe [Channel])@@ -3865,8 +3967,10 @@     , _offName     :: !(Maybe Text)     , _offEmails   :: !(Maybe [Text])     , _offParty    :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Official' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3889,7 +3993,7 @@ official     :: Official official =-    Official'+  Official'     { _offPhotoURL = Nothing     , _offURLs = Nothing     , _offChannels = Nothing@@ -3899,6 +4003,7 @@     , _offEmails = Nothing     , _offParty = Nothing     }+  -- | A URL for a photo of the official. offPhotoURL :: Lens' Official (Maybe Text)
gen/Network/Google/Resource/CivicInfo/Divisions/Search.hs view
@@ -54,11 +54,14 @@ -- | Searches for political divisions by their natural name or OCD ID. -- -- /See:/ 'divisionsSearch' smart constructor.-data DivisionsSearch = DivisionsSearch'+data DivisionsSearch =+  DivisionsSearch'     { _dsPayload :: !DivisionSearchRequest     , _dsQuery   :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DivisionsSearch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -70,10 +73,8 @@     :: DivisionSearchRequest -- ^ 'dsPayload'     -> DivisionsSearch divisionsSearch pDsPayload_ =-    DivisionsSearch'-    { _dsPayload = pDsPayload_-    , _dsQuery = Nothing-    }+  DivisionsSearch' {_dsPayload = pDsPayload_, _dsQuery = Nothing}+  -- | Multipart request metadata. dsPayload :: Lens' DivisionsSearch DivisionSearchRequest
gen/Network/Google/Resource/CivicInfo/Elections/ElectionQuery.hs view
@@ -52,10 +52,13 @@ -- | List of available elections to query. -- -- /See:/ 'electionsElectionQuery' smart constructor.-newtype ElectionsElectionQuery = ElectionsElectionQuery'+newtype ElectionsElectionQuery =+  ElectionsElectionQuery'     { _eeqPayload :: ElectionsQueryRequest-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ElectionsElectionQuery' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -65,9 +68,8 @@     :: ElectionsQueryRequest -- ^ 'eeqPayload'     -> ElectionsElectionQuery electionsElectionQuery pEeqPayload_ =-    ElectionsElectionQuery'-    { _eeqPayload = pEeqPayload_-    }+  ElectionsElectionQuery' {_eeqPayload = pEeqPayload_}+  -- | Multipart request metadata. eeqPayload :: Lens' ElectionsElectionQuery ElectionsQueryRequest
gen/Network/Google/Resource/CivicInfo/Elections/VoterInfoQuery.hs view
@@ -62,14 +62,17 @@ -- registered address. -- -- /See:/ 'electionsVoterInfoQuery' smart constructor.-data ElectionsVoterInfoQuery = ElectionsVoterInfoQuery'+data ElectionsVoterInfoQuery =+  ElectionsVoterInfoQuery'     { _eviqReturnAllAvailableData :: !Bool     , _eviqElectionId             :: !(Textual Int64)     , _eviqAddress                :: !Text     , _eviqPayload                :: !VoterInfoRequest     , _eviqOfficialOnly           :: !Bool-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ElectionsVoterInfoQuery' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -88,13 +91,14 @@     -> VoterInfoRequest -- ^ 'eviqPayload'     -> ElectionsVoterInfoQuery electionsVoterInfoQuery pEviqAddress_ pEviqPayload_ =-    ElectionsVoterInfoQuery'+  ElectionsVoterInfoQuery'     { _eviqReturnAllAvailableData = False     , _eviqElectionId = 0     , _eviqAddress = pEviqAddress_     , _eviqPayload = pEviqPayload_     , _eviqOfficialOnly = False     }+  -- | If set to true, the query will return the success codeand include any -- partial information when it is unable to determine a matching address or
gen/Network/Google/Resource/CivicInfo/Representatives/RepresentativeInfoByAddress.hs view
@@ -67,14 +67,17 @@ -- address. -- -- /See:/ 'representativesRepresentativeInfoByAddress' smart constructor.-data RepresentativesRepresentativeInfoByAddress = RepresentativesRepresentativeInfoByAddress'+data RepresentativesRepresentativeInfoByAddress =+  RepresentativesRepresentativeInfoByAddress'     { _rribaRoles          :: !(Maybe [RepresentativesRepresentativeInfoByAddressRoles])     , _rribaAddress        :: !(Maybe Text)     , _rribaPayload        :: !RepresentativeInfoRequest     , _rribaIncludeOffices :: !Bool     , _rribaLevels         :: !(Maybe [RepresentativesRepresentativeInfoByAddressLevels])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RepresentativesRepresentativeInfoByAddress' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -92,7 +95,7 @@     :: RepresentativeInfoRequest -- ^ 'rribaPayload'     -> RepresentativesRepresentativeInfoByAddress representativesRepresentativeInfoByAddress pRribaPayload_ =-    RepresentativesRepresentativeInfoByAddress'+  RepresentativesRepresentativeInfoByAddress'     { _rribaRoles = Nothing     , _rribaAddress = Nothing     , _rribaPayload = pRribaPayload_@@ -100,6 +103,7 @@     , _rribaLevels = Nothing     } + -- | A list of office roles to filter by. Only offices fulfilling one of -- these roles will be returned. Divisions that don\'t contain a matching -- office will not be returned.@@ -137,7 +141,8 @@       . _Coerce  instance GoogleRequest-         RepresentativesRepresentativeInfoByAddress where+           RepresentativesRepresentativeInfoByAddress+         where         type Rs RepresentativesRepresentativeInfoByAddress =              RepresentativeInfoResponse         type Scopes
gen/Network/Google/Resource/CivicInfo/Representatives/RepresentativeInfoByDivision.hs view
@@ -65,14 +65,17 @@ -- | Looks up representative information for a single geographic division. -- -- /See:/ 'representativesRepresentativeInfoByDivision' smart constructor.-data RepresentativesRepresentativeInfoByDivision = RepresentativesRepresentativeInfoByDivision'+data RepresentativesRepresentativeInfoByDivision =+  RepresentativesRepresentativeInfoByDivision'     { _rribdRoles     :: !(Maybe [RepresentativesRepresentativeInfoByDivisionRoles])     , _rribdPayload   :: !DivisionRepresentativeInfoRequest     , _rribdRecursive :: !(Maybe Bool)     , _rribdOcdId     :: !Text     , _rribdLevels    :: !(Maybe [RepresentativesRepresentativeInfoByDivisionLevels])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RepresentativesRepresentativeInfoByDivision' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -91,7 +94,7 @@     -> Text -- ^ 'rribdOcdId'     -> RepresentativesRepresentativeInfoByDivision representativesRepresentativeInfoByDivision pRribdPayload_ pRribdOcdId_ =-    RepresentativesRepresentativeInfoByDivision'+  RepresentativesRepresentativeInfoByDivision'     { _rribdRoles = Nothing     , _rribdPayload = pRribdPayload_     , _rribdRecursive = Nothing@@ -99,6 +102,7 @@     , _rribdLevels = Nothing     } + -- | A list of office roles to filter by. Only offices fulfilling one of -- these roles will be returned. Divisions that don\'t contain a matching -- office will not be returned.@@ -137,7 +141,8 @@       . _Coerce  instance GoogleRequest-         RepresentativesRepresentativeInfoByDivision where+           RepresentativesRepresentativeInfoByDivision+         where         type Rs RepresentativesRepresentativeInfoByDivision =              RepresentativeInfoData         type Scopes
gogol-civicinfo.cabal view
@@ -1,5 +1,5 @@ name:                  gogol-civicinfo-version:               0.4.0+version:               0.5.0 synopsis:              Google Civic Information SDK. homepage:              https://github.com/brendanhay/gogol bug-reports:           https://github.com/brendanhay/gogol/issues@@ -48,5 +48,5 @@         , Network.Google.CivicInfo.Types.Sum      build-depends:-          gogol-core == 0.4.0.*+          gogol-core == 0.5.0.*         , base       >= 4.7 && < 5