on develop help sign in
Regenerating gogol-sheets
commit50605e9b3d90afbb2a9159d42748da4ae128f296 authorBrendan Hay <brendan.g.hay@gmail.com> dateMon 20 Jun 2016, 10:33 (10 years ago) parent747bded
4 files changed+63−63
gogol-sheets/gen/Network/Google/Sheets.hs+2−2 gogol-sheets/gen/Network/Google/Sheets/Types.hs+2−2 gogol-sheets/gen/Network/Google/Sheets/Types/Product.hs+53−53 gogol-sheets/gen/Network/Google/Sheets/Types/Sum.hs+6−6
gogol-sheets/gen/Network/Google/Sheets.hs+2−2
@@ -1002,8 +1002,8 @@ module Network.Google.Sheets
10021002 , bgvrSpreadsheetId
10031003 , bgvrValueRanges
10041004
1005− -- ** Request
1006− , Request
1005+ -- ** Request'
1006+ , Request'
10071007 , request'
10081008 , reqAddFilterView
10091009 , reqDeleteProtectedRange
gogol-sheets/gen/Network/Google/Sheets/Types.hs+2−2
@@ -969,8 +969,8 @@ module Network.Google.Sheets.Types
969969 , bgvrSpreadsheetId
970970 , bgvrValueRanges
971971
972− -- * Request
973− , Request
972+ -- * Request'
973+ , Request'
974974 , request'
975975 , reqAddFilterView
976976 , reqDeleteProtectedRange
gogol-sheets/gen/Network/Google/Sheets/Types/Product.hs+53−53
@@ -5742,7 +5742,7 @@ instance ToJSON TextToColumnsRequest where
57425742--
57435743-- /See:/ 'batchUpdateSpreadsheetRequest' smart constructor.
57445744newtype BatchUpdateSpreadsheetRequest = BatchUpdateSpreadsheetRequest'
5745− { _busrRequests :: Maybe [Request]
5745+ { _busrRequests :: Maybe [Request']
57465746 } deriving (Eq,Show,Data,Typeable,Generic)
57475747
57485748-- | Creates a value of 'BatchUpdateSpreadsheetRequest' with the minimum fields required to make a request.
@@ -5758,7 +5758,7 @@ batchUpdateSpreadsheetRequest =
57585758 }
57595759
57605760-- | A list of updates to apply to the spreadsheet.
5761−busrRequests :: Lens' BatchUpdateSpreadsheetRequest [Request]
5761+busrRequests :: Lens' BatchUpdateSpreadsheetRequest [Request']
57625762busrRequests
57635763 = lens _busrRequests (\ s a -> s{_busrRequests = a})
57645764 . _Default
@@ -7543,7 +7543,7 @@ instance ToJSON BatchGetValuesResponse where
75437543-- | A single kind of update to apply to a spreadsheet.
75447544--
75457545-- /See:/ 'request'' smart constructor.
7546−data Request = Request'
7546+data Request' = Request''
75477547 { _reqAddFilterView :: !(Maybe AddFilterViewRequest)
75487548 , _reqDeleteProtectedRange :: !(Maybe DeleteProtectedRangeRequest)
75497549 , _reqUpdateProtectedRange :: !(Maybe UpdateProtectedRangeRequest)
@@ -7682,9 +7682,9 @@ data Request = Request'
76827682--
76837683-- * 'reqSetDataValidation'
76847684request'
7685− :: Request
7685+ :: Request'
76867686request' =
7687− Request'
7687+ Request''
76887688 { _reqAddFilterView = Nothing
76897689 , _reqDeleteProtectedRange = Nothing
76907690 , _reqUpdateProtectedRange = Nothing
@@ -7732,268 +7732,268 @@ request' =
77327732 }
77337733
77347734-- | Adds a filter view.
7735−reqAddFilterView :: Lens' Request (Maybe AddFilterViewRequest)
7735+reqAddFilterView :: Lens' Request' (Maybe AddFilterViewRequest)
77367736reqAddFilterView
77377737 = lens _reqAddFilterView
77387738 (\ s a -> s{_reqAddFilterView = a})
77397739
77407740-- | Deletes a protected range.
7741−reqDeleteProtectedRange :: Lens' Request (Maybe DeleteProtectedRangeRequest)
7741+reqDeleteProtectedRange :: Lens' Request' (Maybe DeleteProtectedRangeRequest)
77427742reqDeleteProtectedRange
77437743 = lens _reqDeleteProtectedRange
77447744 (\ s a -> s{_reqDeleteProtectedRange = a})
77457745
77467746-- | Updates a protected range.
7747−reqUpdateProtectedRange :: Lens' Request (Maybe UpdateProtectedRangeRequest)
7747+reqUpdateProtectedRange :: Lens' Request' (Maybe UpdateProtectedRangeRequest)
77487748reqUpdateProtectedRange
77497749 = lens _reqUpdateProtectedRange
77507750 (\ s a -> s{_reqUpdateProtectedRange = a})
77517751
77527752-- | Updates many cells at once.
7753−reqUpdateCells :: Lens' Request (Maybe UpdateCellsRequest)
7753+reqUpdateCells :: Lens' Request' (Maybe UpdateCellsRequest)
77547754reqUpdateCells
77557755 = lens _reqUpdateCells
77567756 (\ s a -> s{_reqUpdateCells = a})
77577757
77587758-- | Duplicates a filter view.
7759−reqDuplicateFilterView :: Lens' Request (Maybe DuplicateFilterViewRequest)
7759+reqDuplicateFilterView :: Lens' Request' (Maybe DuplicateFilterViewRequest)
77607760reqDuplicateFilterView
77617761 = lens _reqDuplicateFilterView
77627762 (\ s a -> s{_reqDuplicateFilterView = a})
77637763
77647764-- | Adds a new conditional format rule.
7765−reqAddConditionalFormatRule :: Lens' Request (Maybe AddConditionalFormatRuleRequest)
7765+reqAddConditionalFormatRule :: Lens' Request' (Maybe AddConditionalFormatRuleRequest)
77667766reqAddConditionalFormatRule
77677767 = lens _reqAddConditionalFormatRule
77687768 (\ s a -> s{_reqAddConditionalFormatRule = a})
77697769
77707770-- | Sorts data in a range.
7771−reqSortRange :: Lens' Request (Maybe SortRangeRequest)
7771+reqSortRange :: Lens' Request' (Maybe SortRangeRequest)
77727772reqSortRange
77737773 = lens _reqSortRange (\ s a -> s{_reqSortRange = a})
77747774
77757775-- | Updates a named range.
7776−reqUpdateNamedRange :: Lens' Request (Maybe UpdateNamedRangeRequest)
7776+reqUpdateNamedRange :: Lens' Request' (Maybe UpdateNamedRangeRequest)
77777777reqUpdateNamedRange
77787778 = lens _reqUpdateNamedRange
77797779 (\ s a -> s{_reqUpdateNamedRange = a})
77807780
77817781-- | Deletes a named range.
7782−reqDeleteNamedRange :: Lens' Request (Maybe DeleteNamedRangeRequest)
7782+reqDeleteNamedRange :: Lens' Request' (Maybe DeleteNamedRangeRequest)
77837783reqDeleteNamedRange
77847784 = lens _reqDeleteNamedRange
77857785 (\ s a -> s{_reqDeleteNamedRange = a})
77867786
77877787-- | Clears the basic filter on a sheet.
7788−reqClearBasicFilter :: Lens' Request (Maybe ClearBasicFilterRequest)
7788+reqClearBasicFilter :: Lens' Request' (Maybe ClearBasicFilterRequest)
77897789reqClearBasicFilter
77907790 = lens _reqClearBasicFilter
77917791 (\ s a -> s{_reqClearBasicFilter = a})
77927792
77937793-- | Appends cells after the last row with data in a sheet.
7794−reqAppendCells :: Lens' Request (Maybe AppendCellsRequest)
7794+reqAppendCells :: Lens' Request' (Maybe AppendCellsRequest)
77957795reqAppendCells
77967796 = lens _reqAppendCells
77977797 (\ s a -> s{_reqAppendCells = a})
77987798
77997799-- | Pastes data (HTML or delimited) into a sheet.
7800−reqPasteData :: Lens' Request (Maybe PasteDataRequest)
7800+reqPasteData :: Lens' Request' (Maybe PasteDataRequest)
78017801reqPasteData
78027802 = lens _reqPasteData (\ s a -> s{_reqPasteData = a})
78037803
78047804-- | Updates an embedded object\'s (e.g. chart, image) position.
7805−reqUpdateEmbeddedObjectPosition :: Lens' Request (Maybe UpdateEmbeddedObjectPositionRequest)
7805+reqUpdateEmbeddedObjectPosition :: Lens' Request' (Maybe UpdateEmbeddedObjectPositionRequest)
78067806reqUpdateEmbeddedObjectPosition
78077807 = lens _reqUpdateEmbeddedObjectPosition
78087808 (\ s a -> s{_reqUpdateEmbeddedObjectPosition = a})
78097809
78107810-- | Copies data from one area and pastes it to another.
7811−reqCopyPaste :: Lens' Request (Maybe CopyPasteRequest)
7811+reqCopyPaste :: Lens' Request' (Maybe CopyPasteRequest)
78127812reqCopyPaste
78137813 = lens _reqCopyPaste (\ s a -> s{_reqCopyPaste = a})
78147814
78157815-- | Automatically resizes one or more dimensions based on the contents of
78167816-- the cells in that dimension.
7817−reqAutoResizeDimensions :: Lens' Request (Maybe AutoResizeDimensionsRequest)
7817+reqAutoResizeDimensions :: Lens' Request' (Maybe AutoResizeDimensionsRequest)
78187818reqAutoResizeDimensions
78197819 = lens _reqAutoResizeDimensions
78207820 (\ s a -> s{_reqAutoResizeDimensions = a})
78217821
78227822-- | Adds a sheet.
7823−reqAddSheet :: Lens' Request (Maybe AddSheetRequest)
7823+reqAddSheet :: Lens' Request' (Maybe AddSheetRequest)
78247824reqAddSheet
78257825 = lens _reqAddSheet (\ s a -> s{_reqAddSheet = a})
78267826
78277827-- | Finds and replaces occurrences of some text with other text.
7828−reqFindReplace :: Lens' Request (Maybe FindReplaceRequest)
7828+reqFindReplace :: Lens' Request' (Maybe FindReplaceRequest)
78297829reqFindReplace
78307830 = lens _reqFindReplace
78317831 (\ s a -> s{_reqFindReplace = a})
78327832
78337833-- | Deletes rows or columns in a sheet.
7834−reqDeleteDimension :: Lens' Request (Maybe DeleteDimensionRequest)
7834+reqDeleteDimension :: Lens' Request' (Maybe DeleteDimensionRequest)
78357835reqDeleteDimension
78367836 = lens _reqDeleteDimension
78377837 (\ s a -> s{_reqDeleteDimension = a})
78387838
78397839-- | Cuts data from one area and pastes it to another.
7840−reqCutPaste :: Lens' Request (Maybe CutPasteRequest)
7840+reqCutPaste :: Lens' Request' (Maybe CutPasteRequest)
78417841reqCutPaste
78427842 = lens _reqCutPaste (\ s a -> s{_reqCutPaste = a})
78437843
78447844-- | Moves rows or columns to another location in a sheet.
7845−reqMoveDimension :: Lens' Request (Maybe MoveDimensionRequest)
7845+reqMoveDimension :: Lens' Request' (Maybe MoveDimensionRequest)
78467846reqMoveDimension
78477847 = lens _reqMoveDimension
78487848 (\ s a -> s{_reqMoveDimension = a})
78497849
78507850-- | Repeats a single cell across a range.
7851−reqRepeatCell :: Lens' Request (Maybe RepeatCellRequest)
7851+reqRepeatCell :: Lens' Request' (Maybe RepeatCellRequest)
78527852reqRepeatCell
78537853 = lens _reqRepeatCell
78547854 (\ s a -> s{_reqRepeatCell = a})
78557855
78567856-- | Adds a protected range.
7857−reqAddProtectedRange :: Lens' Request (Maybe AddProtectedRangeRequest)
7857+reqAddProtectedRange :: Lens' Request' (Maybe AddProtectedRangeRequest)
78587858reqAddProtectedRange
78597859 = lens _reqAddProtectedRange
78607860 (\ s a -> s{_reqAddProtectedRange = a})
78617861
78627862-- | Updates the properties of a filter view.
7863−reqUpdateFilterView :: Lens' Request (Maybe UpdateFilterViewRequest)
7863+reqUpdateFilterView :: Lens' Request' (Maybe UpdateFilterViewRequest)
78647864reqUpdateFilterView
78657865 = lens _reqUpdateFilterView
78667866 (\ s a -> s{_reqUpdateFilterView = a})
78677867
78687868-- | Deletes a filter view from a sheet.
7869−reqDeleteFilterView :: Lens' Request (Maybe DeleteFilterViewRequest)
7869+reqDeleteFilterView :: Lens' Request' (Maybe DeleteFilterViewRequest)
78707870reqDeleteFilterView
78717871 = lens _reqDeleteFilterView
78727872 (\ s a -> s{_reqDeleteFilterView = a})
78737873
78747874-- | Inserts new rows or columns in a sheet.
7875−reqInsertDimension :: Lens' Request (Maybe InsertDimensionRequest)
7875+reqInsertDimension :: Lens' Request' (Maybe InsertDimensionRequest)
78767876reqInsertDimension
78777877 = lens _reqInsertDimension
78787878 (\ s a -> s{_reqInsertDimension = a})
78797879
78807880-- | Updates a sheet\'s properties.
7881−reqUpdateSheetProperties :: Lens' Request (Maybe UpdateSheetPropertiesRequest)
7881+reqUpdateSheetProperties :: Lens' Request' (Maybe UpdateSheetPropertiesRequest)
78827882reqUpdateSheetProperties
78837883 = lens _reqUpdateSheetProperties
78847884 (\ s a -> s{_reqUpdateSheetProperties = a})
78857885
78867886-- | Deletes an existing conditional format rule.
7887−reqDeleteConditionalFormatRule :: Lens' Request (Maybe DeleteConditionalFormatRuleRequest)
7887+reqDeleteConditionalFormatRule :: Lens' Request' (Maybe DeleteConditionalFormatRuleRequest)
78887888reqDeleteConditionalFormatRule
78897889 = lens _reqDeleteConditionalFormatRule
78907890 (\ s a -> s{_reqDeleteConditionalFormatRule = a})
78917891
78927892-- | Updates an existing conditional format rule.
7893−reqUpdateConditionalFormatRule :: Lens' Request (Maybe UpdateConditionalFormatRuleRequest)
7893+reqUpdateConditionalFormatRule :: Lens' Request' (Maybe UpdateConditionalFormatRuleRequest)
78947894reqUpdateConditionalFormatRule
78957895 = lens _reqUpdateConditionalFormatRule
78967896 (\ s a -> s{_reqUpdateConditionalFormatRule = a})
78977897
78987898-- | Deletes an embedded object (e.g, chart, image) in a sheet.
7899−reqDeleteEmbeddedObject :: Lens' Request (Maybe DeleteEmbeddedObjectRequest)
7899+reqDeleteEmbeddedObject :: Lens' Request' (Maybe DeleteEmbeddedObjectRequest)
79007900reqDeleteEmbeddedObject
79017901 = lens _reqDeleteEmbeddedObject
79027902 (\ s a -> s{_reqDeleteEmbeddedObject = a})
79037903
79047904-- | Merges cells together.
7905−reqMergeCells :: Lens' Request (Maybe MergeCellsRequest)
7905+reqMergeCells :: Lens' Request' (Maybe MergeCellsRequest)
79067906reqMergeCells
79077907 = lens _reqMergeCells
79087908 (\ s a -> s{_reqMergeCells = a})
79097909
79107910-- | Adds a named range.
7911−reqAddNamedRange :: Lens' Request (Maybe AddNamedRangeRequest)
7911+reqAddNamedRange :: Lens' Request' (Maybe AddNamedRangeRequest)
79127912reqAddNamedRange
79137913 = lens _reqAddNamedRange
79147914 (\ s a -> s{_reqAddNamedRange = a})
79157915
79167916-- | Adds a chart.
7917−reqAddChart :: Lens' Request (Maybe AddChartRequest)
7917+reqAddChart :: Lens' Request' (Maybe AddChartRequest)
79187918reqAddChart
79197919 = lens _reqAddChart (\ s a -> s{_reqAddChart = a})
79207920
79217921-- | Duplicates a sheet.
7922−reqDuplicateSheet :: Lens' Request (Maybe DuplicateSheetRequest)
7922+reqDuplicateSheet :: Lens' Request' (Maybe DuplicateSheetRequest)
79237923reqDuplicateSheet
79247924 = lens _reqDuplicateSheet
79257925 (\ s a -> s{_reqDuplicateSheet = a})
79267926
79277927-- | Automatically fills in more data based on existing data.
7928−reqAutoFill :: Lens' Request (Maybe AutoFillRequest)
7928+reqAutoFill :: Lens' Request' (Maybe AutoFillRequest)
79297929reqAutoFill
79307930 = lens _reqAutoFill (\ s a -> s{_reqAutoFill = a})
79317931
79327932-- | Updates dimensions\' properties.
7933−reqUpdateDimensionProperties :: Lens' Request (Maybe UpdateDimensionPropertiesRequest)
7933+reqUpdateDimensionProperties :: Lens' Request' (Maybe UpdateDimensionPropertiesRequest)
79347934reqUpdateDimensionProperties
79357935 = lens _reqUpdateDimensionProperties
79367936 (\ s a -> s{_reqUpdateDimensionProperties = a})
79377937
79387938-- | Updates a chart\'s specifications.
7939−reqUpdateChartSpec :: Lens' Request (Maybe UpdateChartSpecRequest)
7939+reqUpdateChartSpec :: Lens' Request' (Maybe UpdateChartSpecRequest)
79407940reqUpdateChartSpec
79417941 = lens _reqUpdateChartSpec
79427942 (\ s a -> s{_reqUpdateChartSpec = a})
79437943
79447944-- | Sets the basic filter on a sheet.
7945−reqSetBasicFilter :: Lens' Request (Maybe SetBasicFilterRequest)
7945+reqSetBasicFilter :: Lens' Request' (Maybe SetBasicFilterRequest)
79467946reqSetBasicFilter
79477947 = lens _reqSetBasicFilter
79487948 (\ s a -> s{_reqSetBasicFilter = a})
79497949
79507950-- | Converts a column of text into many columns of text.
7951−reqTextToColumns :: Lens' Request (Maybe TextToColumnsRequest)
7951+reqTextToColumns :: Lens' Request' (Maybe TextToColumnsRequest)
79527952reqTextToColumns
79537953 = lens _reqTextToColumns
79547954 (\ s a -> s{_reqTextToColumns = a})
79557955
79567956-- | Updates the spreadsheet\'s properties.
7957−reqUpdateSpreadsheetProperties :: Lens' Request (Maybe UpdateSpreadsheetPropertiesRequest)
7957+reqUpdateSpreadsheetProperties :: Lens' Request' (Maybe UpdateSpreadsheetPropertiesRequest)
79587958reqUpdateSpreadsheetProperties
79597959 = lens _reqUpdateSpreadsheetProperties
79607960 (\ s a -> s{_reqUpdateSpreadsheetProperties = a})
79617961
79627962-- | Deletes a sheet.
7963−reqDeleteSheet :: Lens' Request (Maybe DeleteSheetRequest)
7963+reqDeleteSheet :: Lens' Request' (Maybe DeleteSheetRequest)
79647964reqDeleteSheet
79657965 = lens _reqDeleteSheet
79667966 (\ s a -> s{_reqDeleteSheet = a})
79677967
79687968-- | Unmerges merged cells.
7969−reqUnmergeCells :: Lens' Request (Maybe UnmergeCellsRequest)
7969+reqUnmergeCells :: Lens' Request' (Maybe UnmergeCellsRequest)
79707970reqUnmergeCells
79717971 = lens _reqUnmergeCells
79727972 (\ s a -> s{_reqUnmergeCells = a})
79737973
79747974-- | Updates the borders in a range of cells.
7975−reqUpdateBOrders :: Lens' Request (Maybe UpdateBOrdersRequest)
7975+reqUpdateBOrders :: Lens' Request' (Maybe UpdateBOrdersRequest)
79767976reqUpdateBOrders
79777977 = lens _reqUpdateBOrders
79787978 (\ s a -> s{_reqUpdateBOrders = a})
79797979
79807980-- | Appends dimensions to the end of a sheet.
7981−reqAppendDimension :: Lens' Request (Maybe AppendDimensionRequest)
7981+reqAppendDimension :: Lens' Request' (Maybe AppendDimensionRequest)
79827982reqAppendDimension
79837983 = lens _reqAppendDimension
79847984 (\ s a -> s{_reqAppendDimension = a})
79857985
79867986-- | Sets data validation for one or more cells.
7987−reqSetDataValidation :: Lens' Request (Maybe SetDataValidationRequest)
7987+reqSetDataValidation :: Lens' Request' (Maybe SetDataValidationRequest)
79887988reqSetDataValidation
79897989 = lens _reqSetDataValidation
79907990 (\ s a -> s{_reqSetDataValidation = a})
79917991
7992−instance FromJSON Request where
7992+instance FromJSON Request' where
79937993 parseJSON
79947994 = withObject "Request"
79957995 (\ o ->
7996− Request' <$>
7996+ Request'' <$>
79977997 (o .:? "addFilterView") <*>
79987998 (o .:? "deleteProtectedRange")
79997999 <*> (o .:? "updateProtectedRange")
@@ -8039,8 +8039,8 @@ instance FromJSON Request where
80398039 <*> (o .:? "appendDimension")
80408040 <*> (o .:? "setDataValidation"))
80418041
8042−instance ToJSON Request where
8043− toJSON Request'{..}
8042+instance ToJSON Request' where
8043+ toJSON Request''{..}
80448044 = object
80458045 (catMaybes
80468046 [("addFilterView" .=) <$> _reqAddFilterView,
gogol-sheets/gen/Network/Google/Sheets/Types/Sum.hs+6−6
@@ -812,13 +812,13 @@ data CellFormatHorizontalAlignment
812812 = HorizontalAlignUnspecified
813813 -- ^ @HORIZONTAL_ALIGN_UNSPECIFIED@
814814 -- The horizontal alignment is not specified. Do not use this.
815− | Left
815+ | Left'
816816 -- ^ @LEFT@
817817 -- The text is explicitly aligned to the left of the cell.
818818 | Center
819819 -- ^ @CENTER@
820820 -- The text is explicitly aligned to the center of the cell.
821− | Right
821+ | Right'
822822 -- ^ @RIGHT@
823823 -- The text is explicitly aligned to the right of the cell.
824824 deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
@@ -828,17 +828,17 @@ instance Hashable CellFormatHorizontalAlignment
828828instance FromHttpApiData CellFormatHorizontalAlignment where
829829 parseQueryParam = \case
830830 "HORIZONTAL_ALIGN_UNSPECIFIED" -> Right HorizontalAlignUnspecified
831− "LEFT" -> Right Left
831+ "LEFT" -> Right Left'
832832 "CENTER" -> Right Center
833− "RIGHT" -> Right Right
833+ "RIGHT" -> Right Right'
834834 x -> Left ("Unable to parse CellFormatHorizontalAlignment from: " <> x)
835835
836836instance ToHttpApiData CellFormatHorizontalAlignment where
837837 toQueryParam = \case
838838 HorizontalAlignUnspecified -> "HORIZONTAL_ALIGN_UNSPECIFIED"
839− Left -> "LEFT"
839+ Left' -> "LEFT"
840840 Center -> "CENTER"
841− Right -> "RIGHT"
841+ Right' -> "RIGHT"
842842
843843instance FromJSON CellFormatHorizontalAlignment where
844844 parseJSON = parseJSONText "CellFormatHorizontalAlignment"