summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBrendanHay <>2018-05-16 14:36:00 (GMT)
committerhdiff <hdiff@hdiff.luite.com>2018-05-16 14:36:00 (GMT)
commit93895a70425f4c824816ebc6a13986d7ff26f422 (patch)
tree0e6321ed78b3a307af9282f3a33d0163c89819c0
parent74f08c3bd4854cf995c6eead1087385c97fd3107 (diff)
version 1.6.01.6.0
-rw-r--r--README.md2
-rw-r--r--amazonka-cloudsearch-domains.cabal10
-rw-r--r--gen/Network/AWS/CloudSearchDomains.hs2
-rw-r--r--gen/Network/AWS/CloudSearchDomains/Search.hs82
-rw-r--r--gen/Network/AWS/CloudSearchDomains/Suggest.hs22
-rw-r--r--gen/Network/AWS/CloudSearchDomains/Types.hs34
-rw-r--r--gen/Network/AWS/CloudSearchDomains/Types/Product.hs96
-rw-r--r--gen/Network/AWS/CloudSearchDomains/Types/Sum.hs2
-rw-r--r--gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs33
-rw-r--r--gen/Network/AWS/CloudSearchDomains/Waiters.hs2
-rw-r--r--test/Main.hs2
-rw-r--r--test/Test/AWS/CloudSearchDomains.hs2
-rw-r--r--test/Test/AWS/CloudSearchDomains/Internal.hs2
-rw-r--r--test/Test/AWS/Gen/CloudSearchDomains.hs2
14 files changed, 146 insertions, 147 deletions
diff --git a/README.md b/README.md
index 3d84a83..bfa26dd 100644
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
## Version
-`1.5.0`
+`1.6.0`
## Description
diff --git a/amazonka-cloudsearch-domains.cabal b/amazonka-cloudsearch-domains.cabal
index 1f4798f..2b456f8 100644
--- a/amazonka-cloudsearch-domains.cabal
+++ b/amazonka-cloudsearch-domains.cabal
@@ -1,5 +1,5 @@
name: amazonka-cloudsearch-domains
-version: 1.5.0
+version: 1.6.0
synopsis: Amazon CloudSearch Domain SDK.
homepage: https://github.com/brendanhay/amazonka
bug-reports: https://github.com/brendanhay/amazonka/issues
@@ -7,7 +7,7 @@ license: MPL-2.0
license-file: LICENSE
author: Brendan Hay
maintainer: Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-copyright: Copyright (c) 2013-2017 Brendan Hay
+copyright: Copyright (c) 2013-2018 Brendan Hay
category: Network, AWS, Cloud, Distributed Computing
build-type: Simple
cabal-version: >= 1.10
@@ -56,7 +56,7 @@ library
, Network.AWS.CloudSearchDomains.Types.Sum
build-depends:
- amazonka-core == 1.5.0.*
+ amazonka-core == 1.6.0.*
, base >= 4.7 && < 5
test-suite amazonka-cloudsearch-domains-test
@@ -76,8 +76,8 @@ test-suite amazonka-cloudsearch-domains-test
, Test.AWS.CloudSearchDomains.Internal
build-depends:
- amazonka-core == 1.5.0.*
- , amazonka-test == 1.5.0.*
+ amazonka-core == 1.6.0.*
+ , amazonka-test == 1.6.0.*
, amazonka-cloudsearch-domains
, base
, bytestring
diff --git a/gen/Network/AWS/CloudSearchDomains.hs b/gen/Network/AWS/CloudSearchDomains.hs
index cea10e2..2b33638 100644
--- a/gen/Network/AWS/CloudSearchDomains.hs
+++ b/gen/Network/AWS/CloudSearchDomains.hs
@@ -5,7 +5,7 @@
-- |
-- Module : Network.AWS.CloudSearchDomains
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated
diff --git a/gen/Network/AWS/CloudSearchDomains/Search.hs b/gen/Network/AWS/CloudSearchDomains/Search.hs
index 57bef85..ec4bc14 100644
--- a/gen/Network/AWS/CloudSearchDomains/Search.hs
+++ b/gen/Network/AWS/CloudSearchDomains/Search.hs
@@ -12,7 +12,7 @@
-- |
-- Module : Network.AWS.CloudSearchDomains.Search
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated
@@ -125,78 +125,78 @@ search
-> Search
search pQuery_ =
Search'
- { _seaExpr = Nothing
- , _seaCursor = Nothing
- , _seaReturn = Nothing
- , _seaQueryOptions = Nothing
- , _seaFilterQuery = Nothing
- , _seaSize = Nothing
- , _seaQueryParser = Nothing
- , _seaStart = Nothing
- , _seaHighlight = Nothing
- , _seaStats = Nothing
- , _seaSort = Nothing
- , _seaFacet = Nothing
- , _seaPartial = Nothing
- , _seaQuery = pQuery_
- }
+ { _seaExpr = Nothing
+ , _seaCursor = Nothing
+ , _seaReturn = Nothing
+ , _seaQueryOptions = Nothing
+ , _seaFilterQuery = Nothing
+ , _seaSize = Nothing
+ , _seaQueryParser = Nothing
+ , _seaStart = Nothing
+ , _seaHighlight = Nothing
+ , _seaStats = Nothing
+ , _seaSort = Nothing
+ , _seaFacet = Nothing
+ , _seaPartial = Nothing
+ , _seaQuery = pQuery_
+ }
-- | Defines one or more numeric expressions that can be used to sort results or specify search or filter criteria. You can also specify expressions as return fields. You specify the expressions in JSON using the form @{"EXPRESSIONNAME":"EXPRESSION"}@ . You can define and use multiple expressions in a search request. For example: @{"expression1":"_score*rating", "expression2":"(1/rank)*year"} @ For information about the variables, operators, and functions you can use in expressions, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/configuring-expressions.html#writing-expressions Writing Expressions> in the /Amazon CloudSearch Developer Guide/ .
seaExpr :: Lens' Search (Maybe Text)
-seaExpr = lens _seaExpr (\ s a -> s{_seaExpr = a});
+seaExpr = lens _seaExpr (\ s a -> s{_seaExpr = a})
-- | Retrieves a cursor value you can use to page through large result sets. Use the @size@ parameter to control the number of hits to include in each response. You can specify either the @cursor@ or @start@ parameter in a request; they are mutually exclusive. To get the first cursor, set the cursor value to @initial@ . In subsequent requests, specify the cursor value returned in the hits section of the response. For more information, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/paginating-results.html Paginating Results> in the /Amazon CloudSearch Developer Guide/ .
seaCursor :: Lens' Search (Maybe Text)
-seaCursor = lens _seaCursor (\ s a -> s{_seaCursor = a});
+seaCursor = lens _seaCursor (\ s a -> s{_seaCursor = a})
-- | Specifies the field and expression values to include in the response. Multiple fields or expressions are specified as a comma-separated list. By default, a search response includes all return enabled fields (@_all_fields@ ). To return only the document IDs for the matching documents, specify @_no_fields@ . To retrieve the relevance score calculated for each document, specify @_score@ .
seaReturn :: Lens' Search (Maybe Text)
-seaReturn = lens _seaReturn (\ s a -> s{_seaReturn = a});
+seaReturn = lens _seaReturn (\ s a -> s{_seaReturn = a})
-- | Configures options for the query parser specified in the @queryParser@ parameter. You specify the options in JSON using the following form @{"OPTION1":"VALUE1","OPTION2":VALUE2"..."OPTIONN":"VALUEN"}.@ The options you can configure vary according to which parser you use: * @defaultOperator@ : The default operator used to combine individual terms in the search string. For example: @defaultOperator: 'or'@ . For the @dismax@ parser, you specify a percentage that represents the percentage of terms in the search string (rounded down) that must match, rather than a default operator. A value of @0%@ is the equivalent to OR, and a value of @100%@ is equivalent to AND. The percentage must be specified as a value in the range 0-100 followed by the percent (%) symbol. For example, @defaultOperator: 50%@ . Valid values: @and@ , @or@ , a percentage in the range 0%-100% (@dismax@ ). Default: @and@ (@simple@ , @structured@ , @lucene@ ) or @100@ (@dismax@ ). Valid for: @simple@ , @structured@ , @lucene@ , and @dismax@ . * @fields@ : An array of the fields to search when no fields are specified in a search. If no fields are specified in a search and this option is not specified, all text and text-array fields are searched. You can specify a weight for each field to control the relative importance of each field when Amazon CloudSearch calculates relevance scores. To specify a field weight, append a caret (@^@ ) symbol and the weight to the field name. For example, to boost the importance of the @title@ field over the @description@ field you could specify: @"fields":["title^5","description"]@ . Valid values: The name of any configured field and an optional numeric value greater than zero. Default: All @text@ and @text-array@ fields. Valid for: @simple@ , @structured@ , @lucene@ , and @dismax@ . * @operators@ : An array of the operators or special characters you want to disable for the simple query parser. If you disable the @and@ , @or@ , or @not@ operators, the corresponding operators (@+@ , @|@ , @-@ ) have no special meaning and are dropped from the search string. Similarly, disabling @prefix@ disables the wildcard operator (@*@ ) and disabling @phrase@ disables the ability to search for phrases by enclosing phrases in double quotes. Disabling precedence disables the ability to control order of precedence using parentheses. Disabling @near@ disables the ability to use the ~ operator to perform a sloppy phrase search. Disabling the @fuzzy@ operator disables the ability to use the ~ operator to perform a fuzzy search. @escape@ disables the ability to use a backslash (@\@ ) to escape special characters within the search string. Disabling whitespace is an advanced option that prevents the parser from tokenizing on whitespace, which can be useful for Vietnamese. (It prevents Vietnamese words from being split incorrectly.) For example, you could disable all operators other than the phrase operator to support just simple term and phrase queries: @"operators":["and","not","or", "prefix"]@ . Valid values: @and@ , @escape@ , @fuzzy@ , @near@ , @not@ , @or@ , @phrase@ , @precedence@ , @prefix@ , @whitespace@ . Default: All operators and special characters are enabled. Valid for: @simple@ . * @phraseFields@ : An array of the @text@ or @text-array@ fields you want to use for phrase searches. When the terms in the search string appear in close proximity within a field, the field scores higher. You can specify a weight for each field to boost that score. The @phraseSlop@ option controls how much the matches can deviate from the search string and still be boosted. To specify a field weight, append a caret (@^@ ) symbol and the weight to the field name. For example, to boost phrase matches in the @title@ field over the @abstract@ field, you could specify: @"phraseFields":["title^3", "plot"]@ Valid values: The name of any @text@ or @text-array@ field and an optional numeric value greater than zero. Default: No fields. If you don't specify any fields with @phraseFields@ , proximity scoring is disabled even if @phraseSlop@ is specified. Valid for: @dismax@ . * @phraseSlop@ : An integer value that specifies how much matches can deviate from the search phrase and still be boosted according to the weights specified in the @phraseFields@ option; for example, @phraseSlop: 2@ . You must also specify @phraseFields@ to enable proximity scoring. Valid values: positive integers. Default: 0. Valid for: @dismax@ . * @explicitPhraseSlop@ : An integer value that specifies how much a match can deviate from the search phrase when the phrase is enclosed in double quotes in the search string. (Phrases that exceed this proximity distance are not considered a match.) For example, to specify a slop of three for dismax phrase queries, you would specify @"explicitPhraseSlop":3@ . Valid values: positive integers. Default: 0. Valid for: @dismax@ . * @tieBreaker@ : When a term in the search string is found in a document's field, a score is calculated for that field based on how common the word is in that field compared to other documents. If the term occurs in multiple fields within a document, by default only the highest scoring field contributes to the document's overall score. You can specify a @tieBreaker@ value to enable the matches in lower-scoring fields to contribute to the document's score. That way, if two documents have the same max field score for a particular term, the score for the document that has matches in more fields will be higher. The formula for calculating the score with a tieBreaker is @(max field score) + (tieBreaker) * (sum of the scores for the rest of the matching fields)@ . Set @tieBreaker@ to 0 to disregard all but the highest scoring field (pure max): @"tieBreaker":0@ . Set to 1 to sum the scores from all fields (pure sum): @"tieBreaker":1@ . Valid values: 0.0 to 1.0. Default: 0.0. Valid for: @dismax@ .
seaQueryOptions :: Lens' Search (Maybe Text)
-seaQueryOptions = lens _seaQueryOptions (\ s a -> s{_seaQueryOptions = a});
+seaQueryOptions = lens _seaQueryOptions (\ s a -> s{_seaQueryOptions = a})
-- | Specifies a structured query that filters the results of a search without affecting how the results are scored and sorted. You use @filterQuery@ in conjunction with the @query@ parameter to filter the documents that match the constraints specified in the @query@ parameter. Specifying a filter controls only which matching documents are included in the results, it has no effect on how they are scored and sorted. The @filterQuery@ parameter supports the full structured query syntax. For more information about using filters, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/filtering-results.html Filtering Matching Documents> in the /Amazon CloudSearch Developer Guide/ .
seaFilterQuery :: Lens' Search (Maybe Text)
-seaFilterQuery = lens _seaFilterQuery (\ s a -> s{_seaFilterQuery = a});
+seaFilterQuery = lens _seaFilterQuery (\ s a -> s{_seaFilterQuery = a})
-- | Specifies the maximum number of search hits to include in the response.
seaSize :: Lens' Search (Maybe Integer)
-seaSize = lens _seaSize (\ s a -> s{_seaSize = a});
+seaSize = lens _seaSize (\ s a -> s{_seaSize = a})
-- | Specifies which query parser to use to process the request. If @queryParser@ is not specified, Amazon CloudSearch uses the @simple@ query parser. Amazon CloudSearch supports four query parsers: * @simple@ : perform simple searches of @text@ and @text-array@ fields. By default, the @simple@ query parser searches all @text@ and @text-array@ fields. You can specify which fields to search by with the @queryOptions@ parameter. If you prefix a search term with a plus sign (+) documents must contain the term to be considered a match. (This is the default, unless you configure the default operator with the @queryOptions@ parameter.) You can use the @-@ (NOT), @|@ (OR), and @*@ (wildcard) operators to exclude particular terms, find results that match any of the specified terms, or search for a prefix. To search for a phrase rather than individual terms, enclose the phrase in double quotes. For more information, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/searching-text.html Searching for Text> in the /Amazon CloudSearch Developer Guide/ . * @structured@ : perform advanced searches by combining multiple expressions to define the search criteria. You can also search within particular fields, search for values and ranges of values, and use advanced options such as term boosting, @matchall@ , and @near@ . For more information, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/searching-compound-queries.html Constructing Compound Queries> in the /Amazon CloudSearch Developer Guide/ . * @lucene@ : search using the Apache Lucene query parser syntax. For more information, see <http://lucene.apache.org/core/4_6_0/queryparser/org/apache/lucene/queryparser/classic/package-summary.html#package_description Apache Lucene Query Parser Syntax> . * @dismax@ : search using the simplified subset of the Apache Lucene query parser syntax defined by the DisMax query parser. For more information, see <http://wiki.apache.org/solr/DisMaxQParserPlugin#Query_Syntax DisMax Query Parser Syntax> .
seaQueryParser :: Lens' Search (Maybe QueryParser)
-seaQueryParser = lens _seaQueryParser (\ s a -> s{_seaQueryParser = a});
+seaQueryParser = lens _seaQueryParser (\ s a -> s{_seaQueryParser = a})
-- | Specifies the offset of the first search hit you want to return. Note that the result set is zero-based; the first result is at index 0. You can specify either the @start@ or @cursor@ parameter in a request, they are mutually exclusive. For more information, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/paginating-results.html Paginating Results> in the /Amazon CloudSearch Developer Guide/ .
seaStart :: Lens' Search (Maybe Integer)
-seaStart = lens _seaStart (\ s a -> s{_seaStart = a});
+seaStart = lens _seaStart (\ s a -> s{_seaStart = a})
-- | Retrieves highlights for matches in the specified @text@ or @text-array@ fields. Each specified field must be highlight enabled in the domain configuration. The fields and options are specified in JSON using the form @{"FIELD":{"OPTION":VALUE,"OPTION:"STRING"},"FIELD":{"OPTION":VALUE,"OPTION":"STRING"}}@ . You can specify the following highlight options: * @format@ : specifies the format of the data in the text field: @text@ or @html@ . When data is returned as HTML, all non-alphanumeric characters are encoded. The default is @html@ . * @max_phrases@ : specifies the maximum number of occurrences of the search term(s) you want to highlight. By default, the first occurrence is highlighted. * @pre_tag@ : specifies the string to prepend to an occurrence of a search term. The default for HTML highlights is @&lt;em&gt;@ . The default for text highlights is @*@ . * @post_tag@ : specifies the string to append to an occurrence of a search term. The default for HTML highlights is @&lt;/em&gt;@ . The default for text highlights is @*@ . If no highlight options are specified for a field, the returned field text is treated as HTML and the first match is highlighted with emphasis tags: @&lt;em>search-term&lt;/em&gt;@ . For example, the following request retrieves highlights for the @actors@ and @title@ fields. @{ "actors": {}, "title": {"format": "text","max_phrases": 2,"pre_tag": "__","post_tag": "__ "} }@
seaHighlight :: Lens' Search (Maybe Text)
-seaHighlight = lens _seaHighlight (\ s a -> s{_seaHighlight = a});
+seaHighlight = lens _seaHighlight (\ s a -> s{_seaHighlight = a})
-- | Specifies one or more fields for which to get statistics information. Each specified field must be facet-enabled in the domain configuration. The fields are specified in JSON using the form: @{"FIELD-A":{},"FIELD-B":{}}@ There are currently no options supported for statistics.
seaStats :: Lens' Search (Maybe Text)
-seaStats = lens _seaStats (\ s a -> s{_seaStats = a});
+seaStats = lens _seaStats (\ s a -> s{_seaStats = a})
-- | Specifies the fields or custom expressions to use to sort the search results. Multiple fields or expressions are specified as a comma-separated list. You must specify the sort direction (@asc@ or @desc@ ) for each field; for example, @year desc,title asc@ . To use a field to sort results, the field must be sort-enabled in the domain configuration. Array type fields cannot be used for sorting. If no @sort@ parameter is specified, results are sorted by their default relevance scores in descending order: @_score desc@ . You can also sort by document ID (@_id asc@ ) and version (@_version desc@ ). For more information, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/sorting-results.html Sorting Results> in the /Amazon CloudSearch Developer Guide/ .
seaSort :: Lens' Search (Maybe Text)
-seaSort = lens _seaSort (\ s a -> s{_seaSort = a});
+seaSort = lens _seaSort (\ s a -> s{_seaSort = a})
-- | Specifies one or more fields for which to get facet information, and options that control how the facet information is returned. Each specified field must be facet-enabled in the domain configuration. The fields and options are specified in JSON using the form @{"FIELD":{"OPTION":VALUE,"OPTION:"STRING"},"FIELD":{"OPTION":VALUE,"OPTION":"STRING"}}@ . You can specify the following faceting options: * @buckets@ specifies an array of the facet values or ranges to count. Ranges are specified using the same syntax that you use to search for a range of values. For more information, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/searching-ranges.html Searching for a Range of Values> in the /Amazon CloudSearch Developer Guide/ . Buckets are returned in the order they are specified in the request. The @sort@ and @size@ options are not valid if you specify @buckets@ . * @size@ specifies the maximum number of facets to include in the results. By default, Amazon CloudSearch returns counts for the top 10. The @size@ parameter is only valid when you specify the @sort@ option; it cannot be used in conjunction with @buckets@ . * @sort@ specifies how you want to sort the facets in the results: @bucket@ or @count@ . Specify @bucket@ to sort alphabetically or numerically by facet value (in ascending order). Specify @count@ to sort by the facet counts computed for each facet value (in descending order). To retrieve facet counts for particular values or ranges of values, use the @buckets@ option instead of @sort@ . If no facet options are specified, facet counts are computed for all field values, the facets are sorted by facet count, and the top 10 facets are returned in the results. To count particular buckets of values, use the @buckets@ option. For example, the following request uses the @buckets@ option to calculate and return facet counts by decade. @{"year":{"buckets":["[1970,1979]","[1980,1989]","[1990,1999]","[2000,2009]","[2010,}"]}} @ To sort facets by facet count, use the @count@ option. For example, the following request sets the @sort@ option to @count@ to sort the facet values by facet count, with the facet values that have the most matching documents listed first. Setting the @size@ option to 3 returns only the top three facet values. @{"year":{"sort":"count","size":3}} @ To sort the facets by value, use the @bucket@ option. For example, the following request sets the @sort@ option to @bucket@ to sort the facet values numerically by year, with earliest year listed first. @{"year":{"sort":"bucket"}} @ For more information, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/faceting.html Getting and Using Facet Information> in the /Amazon CloudSearch Developer Guide/ .
seaFacet :: Lens' Search (Maybe Text)
-seaFacet = lens _seaFacet (\ s a -> s{_seaFacet = a});
+seaFacet = lens _seaFacet (\ s a -> s{_seaFacet = a})
-- | Enables partial results to be returned if one or more index partitions are unavailable. When your search index is partitioned across multiple search instances, by default Amazon CloudSearch only returns results if every partition can be queried. This means that the failure of a single search instance can result in 5xx (internal server) errors. When you enable partial results, Amazon CloudSearch returns whatever results are available and includes the percentage of documents searched in the search results (percent-searched). This enables you to more gracefully degrade your users' search experience. For example, rather than displaying no results, you could display the partial results and a message indicating that the results might be incomplete due to a temporary system outage.
seaPartial :: Lens' Search (Maybe Bool)
-seaPartial = lens _seaPartial (\ s a -> s{_seaPartial = a});
+seaPartial = lens _seaPartial (\ s a -> s{_seaPartial = a})
-- | Specifies the search criteria for the request. How you specify the search criteria depends on the query parser used for the request and the parser options specified in the @queryOptions@ parameter. By default, the @simple@ query parser is used to process requests. To use the @structured@ , @lucene@ , or @dismax@ query parser, you must also specify the @queryParser@ parameter. For more information about specifying search criteria, see <http://docs.aws.amazon.com/cloudsearch/latest/developerguide/searching.html Searching Your Data> in the /Amazon CloudSearch Developer Guide/ .
seaQuery :: Lens' Search Text
-seaQuery = lens _seaQuery (\ s a -> s{_seaQuery = a});
+seaQuery = lens _seaQuery (\ s a -> s{_seaQuery = a})
instance AWSRequest Search where
type Rs Search = SearchResponse
@@ -269,32 +269,32 @@ searchResponse
-> SearchResponse
searchResponse pResponseStatus_ =
SearchResponse'
- { _searsStatus = Nothing
- , _searsFacets = Nothing
- , _searsStats = Nothing
- , _searsHits = Nothing
- , _searsResponseStatus = pResponseStatus_
- }
+ { _searsStatus = Nothing
+ , _searsFacets = Nothing
+ , _searsStats = Nothing
+ , _searsHits = Nothing
+ , _searsResponseStatus = pResponseStatus_
+ }
-- | The status information returned for the search request.
searsStatus :: Lens' SearchResponse (Maybe SearchStatus)
-searsStatus = lens _searsStatus (\ s a -> s{_searsStatus = a});
+searsStatus = lens _searsStatus (\ s a -> s{_searsStatus = a})
-- | The requested facet information.
searsFacets :: Lens' SearchResponse (HashMap Text BucketInfo)
-searsFacets = lens _searsFacets (\ s a -> s{_searsFacets = a}) . _Default . _Map;
+searsFacets = lens _searsFacets (\ s a -> s{_searsFacets = a}) . _Default . _Map
-- | The requested field statistics information.
searsStats :: Lens' SearchResponse (HashMap Text FieldStats)
-searsStats = lens _searsStats (\ s a -> s{_searsStats = a}) . _Default . _Map;
+searsStats = lens _searsStats (\ s a -> s{_searsStats = a}) . _Default . _Map
-- | The documents that match the search criteria.
searsHits :: Lens' SearchResponse (Maybe Hits)
-searsHits = lens _searsHits (\ s a -> s{_searsHits = a});
+searsHits = lens _searsHits (\ s a -> s{_searsHits = a})
-- | -- | The response status code.
searsResponseStatus :: Lens' SearchResponse Int
-searsResponseStatus = lens _searsResponseStatus (\ s a -> s{_searsResponseStatus = a});
+searsResponseStatus = lens _searsResponseStatus (\ s a -> s{_searsResponseStatus = a})
instance NFData SearchResponse where
diff --git a/gen/Network/AWS/CloudSearchDomains/Suggest.hs b/gen/Network/AWS/CloudSearchDomains/Suggest.hs
index 7aee394..81a5355 100644
--- a/gen/Network/AWS/CloudSearchDomains/Suggest.hs
+++ b/gen/Network/AWS/CloudSearchDomains/Suggest.hs
@@ -12,7 +12,7 @@
-- |
-- Module : Network.AWS.CloudSearchDomains.Suggest
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated
@@ -82,15 +82,15 @@ suggest pQuery_ pSuggester_ =
-- | Specifies the maximum number of suggestions to return.
sSize :: Lens' Suggest (Maybe Integer)
-sSize = lens _sSize (\ s a -> s{_sSize = a});
+sSize = lens _sSize (\ s a -> s{_sSize = a})
-- | Specifies the string for which you want to get suggestions.
sQuery :: Lens' Suggest Text
-sQuery = lens _sQuery (\ s a -> s{_sQuery = a});
+sQuery = lens _sQuery (\ s a -> s{_sQuery = a})
-- | Specifies the name of the suggester to use to find suggested matches.
sSuggester :: Lens' Suggest Text
-sSuggester = lens _sSuggester (\ s a -> s{_sSuggester = a});
+sSuggester = lens _sSuggester (\ s a -> s{_sSuggester = a})
instance AWSRequest Suggest where
type Rs Suggest = SuggestResponse
@@ -148,22 +148,22 @@ suggestResponse
-> SuggestResponse
suggestResponse pResponseStatus_ =
SuggestResponse'
- { _srsSuggest = Nothing
- , _srsStatus = Nothing
- , _srsResponseStatus = pResponseStatus_
- }
+ { _srsSuggest = Nothing
+ , _srsStatus = Nothing
+ , _srsResponseStatus = pResponseStatus_
+ }
-- | Container for the matching search suggestion information.
srsSuggest :: Lens' SuggestResponse (Maybe SuggestModel)
-srsSuggest = lens _srsSuggest (\ s a -> s{_srsSuggest = a});
+srsSuggest = lens _srsSuggest (\ s a -> s{_srsSuggest = a})
-- | The status of a @SuggestRequest@ . Contains the resource ID (@rid@ ) and how long it took to process the request (@timems@ ).
srsStatus :: Lens' SuggestResponse (Maybe SuggestStatus)
-srsStatus = lens _srsStatus (\ s a -> s{_srsStatus = a});
+srsStatus = lens _srsStatus (\ s a -> s{_srsStatus = a})
-- | -- | The response status code.
srsResponseStatus :: Lens' SuggestResponse Int
-srsResponseStatus = lens _srsResponseStatus (\ s a -> s{_srsResponseStatus = a});
+srsResponseStatus = lens _srsResponseStatus (\ s a -> s{_srsResponseStatus = a})
instance NFData SuggestResponse where
diff --git a/gen/Network/AWS/CloudSearchDomains/Types.hs b/gen/Network/AWS/CloudSearchDomains/Types.hs
index 06c3102..2e2b179 100644
--- a/gen/Network/AWS/CloudSearchDomains/Types.hs
+++ b/gen/Network/AWS/CloudSearchDomains/Types.hs
@@ -4,7 +4,7 @@
-- |
-- Module : Network.AWS.CloudSearchDomains.Types
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated
@@ -106,24 +106,24 @@ import Network.AWS.Sign.V4
cloudSearchDomains :: Service
cloudSearchDomains =
Service
- { _svcAbbrev = "CloudSearchDomains"
- , _svcSigner = v4
- , _svcPrefix = "cloudsearchdomain"
- , _svcVersion = "2013-01-01"
- , _svcEndpoint = defaultEndpoint cloudSearchDomains
- , _svcTimeout = Just 70
- , _svcCheck = statusSuccess
- , _svcError = parseJSONError "CloudSearchDomains"
- , _svcRetry = retry
- }
+ { _svcAbbrev = "CloudSearchDomains"
+ , _svcSigner = v4
+ , _svcPrefix = "cloudsearchdomain"
+ , _svcVersion = "2013-01-01"
+ , _svcEndpoint = defaultEndpoint cloudSearchDomains
+ , _svcTimeout = Just 70
+ , _svcCheck = statusSuccess
+ , _svcError = parseJSONError "CloudSearchDomains"
+ , _svcRetry = retry
+ }
where
retry =
Exponential
- { _retryBase = 5.0e-2
- , _retryGrowth = 2
- , _retryAttempts = 5
- , _retryCheck = check
- }
+ { _retryBase = 5.0e-2
+ , _retryGrowth = 2
+ , _retryAttempts = 5
+ , _retryCheck = check
+ }
check e
| has (hasCode "ThrottledException" . hasStatus 400) e =
Just "throttled_exception"
@@ -132,6 +132,8 @@ cloudSearchDomains =
Just "throttling_exception"
| has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"
| has (hasStatus 504) e = Just "gateway_timeout"
+ | has (hasCode "RequestThrottledException" . hasStatus 400) e =
+ Just "request_throttled_exception"
| has (hasStatus 502) e = Just "bad_gateway"
| has (hasStatus 503) e = Just "service_unavailable"
| has (hasStatus 500) e = Just "general_server_error"
diff --git a/gen/Network/AWS/CloudSearchDomains/Types/Product.hs b/gen/Network/AWS/CloudSearchDomains/Types/Product.hs
index 5bb0c89..4c2e5bd 100644
--- a/gen/Network/AWS/CloudSearchDomains/Types/Product.hs
+++ b/gen/Network/AWS/CloudSearchDomains/Types/Product.hs
@@ -9,7 +9,7 @@
-- |
-- Module : Network.AWS.CloudSearchDomains.Types.Product
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated
@@ -46,11 +46,11 @@ bucket = Bucket' {_bValue = Nothing, _bCount = Nothing}
-- | The facet value being counted.
bValue :: Lens' Bucket (Maybe Text)
-bValue = lens _bValue (\ s a -> s{_bValue = a});
+bValue = lens _bValue (\ s a -> s{_bValue = a})
-- | The number of hits that contain the facet value in the specified facet field.
bCount :: Lens' Bucket (Maybe Integer)
-bCount = lens _bCount (\ s a -> s{_bCount = a});
+bCount = lens _bCount (\ s a -> s{_bCount = a})
instance FromJSON Bucket where
parseJSON
@@ -84,7 +84,7 @@ bucketInfo = BucketInfo' {_biBuckets = Nothing}
-- | A list of the calculated facet values and counts.
biBuckets :: Lens' BucketInfo [Bucket]
-biBuckets = lens _biBuckets (\ s a -> s{_biBuckets = a}) . _Default . _Coerce;
+biBuckets = lens _biBuckets (\ s a -> s{_biBuckets = a}) . _Default . _Coerce
instance FromJSON BucketInfo where
parseJSON
@@ -117,7 +117,7 @@ documentServiceWarning = DocumentServiceWarning' {_dswMessage = Nothing}
-- | The description for a warning returned by the document service.
dswMessage :: Lens' DocumentServiceWarning (Maybe Text)
-dswMessage = lens _dswMessage (\ s a -> s{_dswMessage = a});
+dswMessage = lens _dswMessage (\ s a -> s{_dswMessage = a})
instance FromJSON DocumentServiceWarning where
parseJSON
@@ -169,48 +169,48 @@ fieldStats
:: FieldStats
fieldStats =
FieldStats'
- { _fsMax = Nothing
- , _fsMean = Nothing
- , _fsCount = Nothing
- , _fsMissing = Nothing
- , _fsStddev = Nothing
- , _fsMin = Nothing
- , _fsSumOfSquares = Nothing
- , _fsSum = Nothing
- }
+ { _fsMax = Nothing
+ , _fsMean = Nothing
+ , _fsCount = Nothing
+ , _fsMissing = Nothing
+ , _fsStddev = Nothing
+ , _fsMin = Nothing
+ , _fsSumOfSquares = Nothing
+ , _fsSum = Nothing
+ }
-- | The maximum value found in the specified field in the result set. If the field is numeric (@int@ , @int-array@ , @double@ , or @double-array@ ), @max@ is the string representation of a double-precision 64-bit floating point value. If the field is @date@ or @date-array@ , @max@ is the string representation of a date with the format specified in <http://tools.ietf.org/html/rfc3339 IETF RFC3339> : yyyy-mm-ddTHH:mm:ss.SSSZ.
fsMax :: Lens' FieldStats (Maybe Text)
-fsMax = lens _fsMax (\ s a -> s{_fsMax = a});
+fsMax = lens _fsMax (\ s a -> s{_fsMax = a})
-- | The average of the values found in the specified field in the result set. If the field is numeric (@int@ , @int-array@ , @double@ , or @double-array@ ), @mean@ is the string representation of a double-precision 64-bit floating point value. If the field is @date@ or @date-array@ , @mean@ is the string representation of a date with the format specified in <http://tools.ietf.org/html/rfc3339 IETF RFC3339> : yyyy-mm-ddTHH:mm:ss.SSSZ.
fsMean :: Lens' FieldStats (Maybe Text)
-fsMean = lens _fsMean (\ s a -> s{_fsMean = a});
+fsMean = lens _fsMean (\ s a -> s{_fsMean = a})
-- | The number of documents that contain a value in the specified field in the result set.
fsCount :: Lens' FieldStats (Maybe Integer)
-fsCount = lens _fsCount (\ s a -> s{_fsCount = a});
+fsCount = lens _fsCount (\ s a -> s{_fsCount = a})
-- | The number of documents that do not contain a value in the specified field in the result set.
fsMissing :: Lens' FieldStats (Maybe Integer)
-fsMissing = lens _fsMissing (\ s a -> s{_fsMissing = a});
+fsMissing = lens _fsMissing (\ s a -> s{_fsMissing = a})
-- | The standard deviation of the values in the specified field in the result set.
fsStddev :: Lens' FieldStats (Maybe Double)
-fsStddev = lens _fsStddev (\ s a -> s{_fsStddev = a});
+fsStddev = lens _fsStddev (\ s a -> s{_fsStddev = a})
-- | The minimum value found in the specified field in the result set. If the field is numeric (@int@ , @int-array@ , @double@ , or @double-array@ ), @min@ is the string representation of a double-precision 64-bit floating point value. If the field is @date@ or @date-array@ , @min@ is the string representation of a date with the format specified in <http://tools.ietf.org/html/rfc3339 IETF RFC3339> : yyyy-mm-ddTHH:mm:ss.SSSZ.
fsMin :: Lens' FieldStats (Maybe Text)
-fsMin = lens _fsMin (\ s a -> s{_fsMin = a});
+fsMin = lens _fsMin (\ s a -> s{_fsMin = a})
-- | The sum of all field values in the result set squared.
fsSumOfSquares :: Lens' FieldStats (Maybe Double)
-fsSumOfSquares = lens _fsSumOfSquares (\ s a -> s{_fsSumOfSquares = a});
+fsSumOfSquares = lens _fsSumOfSquares (\ s a -> s{_fsSumOfSquares = a})
-- | The sum of the field values across the documents in the result set. @null@ for date fields.
fsSum :: Lens' FieldStats (Maybe Double)
-fsSum = lens _fsSum (\ s a -> s{_fsSum = a});
+fsSum = lens _fsSum (\ s a -> s{_fsSum = a})
instance FromJSON FieldStats where
parseJSON
@@ -256,28 +256,28 @@ hit
:: Hit
hit =
Hit'
- { _hitExprs = Nothing
- , _hitId = Nothing
- , _hitHighlights = Nothing
- , _hitFields = Nothing
- }
+ { _hitExprs = Nothing
+ , _hitId = Nothing
+ , _hitHighlights = Nothing
+ , _hitFields = Nothing
+ }
-- | The expressions returned from a document that matches the search request.
hitExprs :: Lens' Hit (HashMap Text Text)
-hitExprs = lens _hitExprs (\ s a -> s{_hitExprs = a}) . _Default . _Map;
+hitExprs = lens _hitExprs (\ s a -> s{_hitExprs = a}) . _Default . _Map
-- | The document ID of a document that matches the search request.
hitId :: Lens' Hit (Maybe Text)
-hitId = lens _hitId (\ s a -> s{_hitId = a});
+hitId = lens _hitId (\ s a -> s{_hitId = a})
-- | The highlights returned from a document that matches the search request.
hitHighlights :: Lens' Hit (HashMap Text Text)
-hitHighlights = lens _hitHighlights (\ s a -> s{_hitHighlights = a}) . _Default . _Map;
+hitHighlights = lens _hitHighlights (\ s a -> s{_hitHighlights = a}) . _Default . _Map
-- | The fields returned from a document that matches the search request.
hitFields :: Lens' Hit (HashMap Text [Text])
-hitFields = lens _hitFields (\ s a -> s{_hitFields = a}) . _Default . _Map;
+hitFields = lens _hitFields (\ s a -> s{_hitFields = a}) . _Default . _Map
instance FromJSON Hit where
parseJSON
@@ -320,24 +320,24 @@ hits
:: Hits
hits =
Hits'
- {_hCursor = Nothing, _hHit = Nothing, _hStart = Nothing, _hFound = Nothing}
+ {_hCursor = Nothing, _hHit = Nothing, _hStart = Nothing, _hFound = Nothing}
-- | A cursor that can be used to retrieve the next set of matching documents when you want to page through a large result set.
hCursor :: Lens' Hits (Maybe Text)
-hCursor = lens _hCursor (\ s a -> s{_hCursor = a});
+hCursor = lens _hCursor (\ s a -> s{_hCursor = a})
-- | A document that matches the search request.
hHit :: Lens' Hits [Hit]
-hHit = lens _hHit (\ s a -> s{_hHit = a}) . _Default . _Coerce;
+hHit = lens _hHit (\ s a -> s{_hHit = a}) . _Default . _Coerce
-- | The index of the first matching document.
hStart :: Lens' Hits (Maybe Integer)
-hStart = lens _hStart (\ s a -> s{_hStart = a});
+hStart = lens _hStart (\ s a -> s{_hStart = a})
-- | The total number of documents that match the search request.
hFound :: Lens' Hits (Maybe Integer)
-hFound = lens _hFound (\ s a -> s{_hFound = a});
+hFound = lens _hFound (\ s a -> s{_hFound = a})
instance FromJSON Hits where
parseJSON
@@ -377,11 +377,11 @@ searchStatus = SearchStatus' {_sRid = Nothing, _sTimems = Nothing}
-- | The encrypted resource ID for the request.
sRid :: Lens' SearchStatus (Maybe Text)
-sRid = lens _sRid (\ s a -> s{_sRid = a});
+sRid = lens _sRid (\ s a -> s{_sRid = a})
-- | How long it took to process the request, in milliseconds.
sTimems :: Lens' SearchStatus (Maybe Integer)
-sTimems = lens _sTimems (\ s a -> s{_sTimems = a});
+sTimems = lens _sTimems (\ s a -> s{_sTimems = a})
instance FromJSON SearchStatus where
parseJSON
@@ -418,20 +418,20 @@ suggestModel
:: SuggestModel
suggestModel =
SuggestModel'
- {_smFound = Nothing, _smSuggestions = Nothing, _smQuery = Nothing}
+ {_smFound = Nothing, _smSuggestions = Nothing, _smQuery = Nothing}
-- | The number of documents that were found to match the query string.
smFound :: Lens' SuggestModel (Maybe Integer)
-smFound = lens _smFound (\ s a -> s{_smFound = a});
+smFound = lens _smFound (\ s a -> s{_smFound = a})
-- | The documents that match the query string.
smSuggestions :: Lens' SuggestModel [SuggestionMatch]
-smSuggestions = lens _smSuggestions (\ s a -> s{_smSuggestions = a}) . _Default . _Coerce;
+smSuggestions = lens _smSuggestions (\ s a -> s{_smSuggestions = a}) . _Default . _Coerce
-- | The query string specified in the suggest request.
smQuery :: Lens' SuggestModel (Maybe Text)
-smQuery = lens _smQuery (\ s a -> s{_smQuery = a});
+smQuery = lens _smQuery (\ s a -> s{_smQuery = a})
instance FromJSON SuggestModel where
parseJSON
@@ -470,11 +470,11 @@ suggestStatus = SuggestStatus' {_ssRid = Nothing, _ssTimems = Nothing}
-- | The encrypted resource ID for the request.
ssRid :: Lens' SuggestStatus (Maybe Text)
-ssRid = lens _ssRid (\ s a -> s{_ssRid = a});
+ssRid = lens _ssRid (\ s a -> s{_ssRid = a})
-- | How long it took to process the request, in milliseconds.
ssTimems :: Lens' SuggestStatus (Maybe Integer)
-ssTimems = lens _ssTimems (\ s a -> s{_ssTimems = a});
+ssTimems = lens _ssTimems (\ s a -> s{_ssTimems = a})
instance FromJSON SuggestStatus where
parseJSON
@@ -512,20 +512,20 @@ suggestionMatch
:: SuggestionMatch
suggestionMatch =
SuggestionMatch'
- {_smSuggestion = Nothing, _smScore = Nothing, _smId = Nothing}
+ {_smSuggestion = Nothing, _smScore = Nothing, _smId = Nothing}
-- | The string that matches the query string specified in the @SuggestRequest@ .
smSuggestion :: Lens' SuggestionMatch (Maybe Text)
-smSuggestion = lens _smSuggestion (\ s a -> s{_smSuggestion = a});
+smSuggestion = lens _smSuggestion (\ s a -> s{_smSuggestion = a})
-- | The relevance score of a suggested match.
smScore :: Lens' SuggestionMatch (Maybe Integer)
-smScore = lens _smScore (\ s a -> s{_smScore = a});
+smScore = lens _smScore (\ s a -> s{_smScore = a})
-- | The document ID of the suggested document.
smId :: Lens' SuggestionMatch (Maybe Text)
-smId = lens _smId (\ s a -> s{_smId = a});
+smId = lens _smId (\ s a -> s{_smId = a})
instance FromJSON SuggestionMatch where
parseJSON
diff --git a/gen/Network/AWS/CloudSearchDomains/Types/Sum.hs b/gen/Network/AWS/CloudSearchDomains/Types/Sum.hs
index ba467f0..d67e618 100644
--- a/gen/Network/AWS/CloudSearchDomains/Types/Sum.hs
+++ b/gen/Network/AWS/CloudSearchDomains/Types/Sum.hs
@@ -9,7 +9,7 @@
-- |
-- Module : Network.AWS.CloudSearchDomains.Types.Sum
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated
diff --git a/gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs b/gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs
index f36bd82..40f814c 100644
--- a/gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs
+++ b/gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs
@@ -12,7 +12,7 @@
-- |
-- Module : Network.AWS.CloudSearchDomains.UploadDocuments
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated
@@ -80,11 +80,11 @@ uploadDocuments pContentType_ pDocuments_ =
-- | The format of the batch you are uploading. Amazon CloudSearch supports two document batch formats: * application/json * application/xml
udContentType :: Lens' UploadDocuments ContentType
-udContentType = lens _udContentType (\ s a -> s{_udContentType = a});
+udContentType = lens _udContentType (\ s a -> s{_udContentType = a})
-- | A batch of documents formatted in JSON or HTML.
udDocuments :: Lens' UploadDocuments HashedBody
-udDocuments = lens _udDocuments (\ s a -> s{_udDocuments = a});
+udDocuments = lens _udDocuments (\ s a -> s{_udDocuments = a})
instance AWSRequest UploadDocuments where
type Rs UploadDocuments = UploadDocumentsResponse
@@ -103,10 +103,7 @@ instance ToBody UploadDocuments where
instance ToHeaders UploadDocuments where
toHeaders UploadDocuments'{..}
- = mconcat
- ["Content-Type" =# _udContentType,
- "Content-Type" =#
- ("application/x-amz-json-1.1" :: ByteString)]
+ = mconcat ["Content-Type" =# _udContentType]
instance ToPath UploadDocuments where
toPath = const "/2013-01-01/documents/batch"
@@ -146,32 +143,32 @@ uploadDocumentsResponse
-> UploadDocumentsResponse
uploadDocumentsResponse pResponseStatus_ =
UploadDocumentsResponse'
- { _udrsStatus = Nothing
- , _udrsAdds = Nothing
- , _udrsWarnings = Nothing
- , _udrsDeletes = Nothing
- , _udrsResponseStatus = pResponseStatus_
- }
+ { _udrsStatus = Nothing
+ , _udrsAdds = Nothing
+ , _udrsWarnings = Nothing
+ , _udrsDeletes = Nothing
+ , _udrsResponseStatus = pResponseStatus_
+ }
-- | The status of an @UploadDocumentsRequest@ .
udrsStatus :: Lens' UploadDocumentsResponse (Maybe Text)
-udrsStatus = lens _udrsStatus (\ s a -> s{_udrsStatus = a});
+udrsStatus = lens _udrsStatus (\ s a -> s{_udrsStatus = a})
-- | The number of documents that were added to the search domain.
udrsAdds :: Lens' UploadDocumentsResponse (Maybe Integer)
-udrsAdds = lens _udrsAdds (\ s a -> s{_udrsAdds = a});
+udrsAdds = lens _udrsAdds (\ s a -> s{_udrsAdds = a})
-- | Any warnings returned by the document service about the documents being uploaded.
udrsWarnings :: Lens' UploadDocumentsResponse [DocumentServiceWarning]
-udrsWarnings = lens _udrsWarnings (\ s a -> s{_udrsWarnings = a}) . _Default . _Coerce;
+udrsWarnings = lens _udrsWarnings (\ s a -> s{_udrsWarnings = a}) . _Default . _Coerce
-- | The number of documents that were deleted from the search domain.
udrsDeletes :: Lens' UploadDocumentsResponse (Maybe Integer)
-udrsDeletes = lens _udrsDeletes (\ s a -> s{_udrsDeletes = a});
+udrsDeletes = lens _udrsDeletes (\ s a -> s{_udrsDeletes = a})
-- | -- | The response status code.
udrsResponseStatus :: Lens' UploadDocumentsResponse Int
-udrsResponseStatus = lens _udrsResponseStatus (\ s a -> s{_udrsResponseStatus = a});
+udrsResponseStatus = lens _udrsResponseStatus (\ s a -> s{_udrsResponseStatus = a})
instance NFData UploadDocumentsResponse where
diff --git a/gen/Network/AWS/CloudSearchDomains/Waiters.hs b/gen/Network/AWS/CloudSearchDomains/Waiters.hs
index 12ac4c3..db49ac9 100644
--- a/gen/Network/AWS/CloudSearchDomains/Waiters.hs
+++ b/gen/Network/AWS/CloudSearchDomains/Waiters.hs
@@ -7,7 +7,7 @@
-- |
-- Module : Network.AWS.CloudSearchDomains.Waiters
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated
diff --git a/test/Main.hs b/test/Main.hs
index 686e863..690a1ce 100644
--- a/test/Main.hs
+++ b/test/Main.hs
@@ -2,7 +2,7 @@
-- |
-- Module : Main
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated
diff --git a/test/Test/AWS/CloudSearchDomains.hs b/test/Test/AWS/CloudSearchDomains.hs
index 5317f29..ec7c8e5 100644
--- a/test/Test/AWS/CloudSearchDomains.hs
+++ b/test/Test/AWS/CloudSearchDomains.hs
@@ -1,7 +1,7 @@
{-# LANGUAGE OverloadedStrings #-}
-- Module : Test.AWS.CloudSearchDomains
--- Copyright : (c) 2013-2016 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : This Source Code Form is subject to the terms of
-- the Mozilla Public License, v. 2.0.
-- A copy of the MPL can be found in the LICENSE file or
diff --git a/test/Test/AWS/CloudSearchDomains/Internal.hs b/test/Test/AWS/CloudSearchDomains/Internal.hs
index 2b9861e..63588fa 100644
--- a/test/Test/AWS/CloudSearchDomains/Internal.hs
+++ b/test/Test/AWS/CloudSearchDomains/Internal.hs
@@ -2,7 +2,7 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- Module : Test.AWS.CloudSearchDomains.Internal
--- Copyright : (c) 2013-2016 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : This Source Code Form is subject to the terms of
-- the Mozilla Public License, v. 2.0.
-- A copy of the MPL can be found in the LICENSE file or
diff --git a/test/Test/AWS/Gen/CloudSearchDomains.hs b/test/Test/AWS/Gen/CloudSearchDomains.hs
index 166ddb8..f1e1369 100644
--- a/test/Test/AWS/Gen/CloudSearchDomains.hs
+++ b/test/Test/AWS/Gen/CloudSearchDomains.hs
@@ -5,7 +5,7 @@
-- |
-- Module : Test.AWS.Gen.CloudSearchDomains
--- Copyright : (c) 2013-2017 Brendan Hay
+-- Copyright : (c) 2013-2018 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability : auto-generated