Skip to content

Commit 1543b65

Browse files
author
Magnus Therning
committed
Remove bits of ActionRevision with wrong types
Signed-off-by: Magnus Therning <magnus.therning@zimpler.com>
1 parent d612008 commit 1543b65

File tree

3 files changed

+3
-25
lines changed

3 files changed

+3
-25
lines changed

amazonka-codepipeline/gen/Network/AWS/CodePipeline.hs

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -401,8 +401,6 @@ module Network.AWS.CodePipeline
401401
, ActionRevision
402402
, actionRevision
403403
, aRevisionId
404-
, aRevisionChangeId
405-
, aCreated
406404

407405
-- ** ActionState
408406
, ActionState

amazonka-codepipeline/gen/Network/AWS/CodePipeline/Types.hs

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -147,8 +147,6 @@ module Network.AWS.CodePipeline.Types
147147
, ActionRevision
148148
, actionRevision
149149
, aRevisionId
150-
, aRevisionChangeId
151-
, aCreated
152150

153151
-- * ActionState
154152
, ActionState

amazonka-codepipeline/gen/Network/AWS/CodePipeline/Types/Product.hs

Lines changed: 3 additions & 21 deletions
Original file line numberDiff line numberDiff line change
@@ -476,8 +476,6 @@ instance NFData ActionExecution where
476476
-- /See:/ 'actionRevision' smart constructor.
477477
data ActionRevision = ActionRevision'
478478
{ _aRevisionId :: !Text
479-
, _aRevisionChangeId :: !Text
480-
, _aCreated :: !POSIX
481479
} deriving (Eq, Read, Show, Data, Typeable, Generic)
482480

483481

@@ -492,36 +490,22 @@ data ActionRevision = ActionRevision'
492490
-- * 'aCreated' - The date and time when the most recent version of the action was created, in timestamp format.
493491
actionRevision
494492
:: Text -- ^ 'aRevisionId'
495-
-> Text -- ^ 'aRevisionChangeId'
496-
-> UTCTime -- ^ 'aCreated'
497493
-> ActionRevision
498-
actionRevision pRevisionId_ pRevisionChangeId_ pCreated_ =
494+
actionRevision pRevisionId_ =
499495
ActionRevision'
500496
{ _aRevisionId = pRevisionId_
501-
, _aRevisionChangeId = pRevisionChangeId_
502-
, _aCreated = _Time # pCreated_
503497
}
504498

505499

506500
-- | The system-generated unique ID that identifies the revision number of the action.
507501
aRevisionId :: Lens' ActionRevision Text
508502
aRevisionId = lens _aRevisionId (\ s a -> s{_aRevisionId = a})
509503

510-
-- | The unique identifier of the change that set the state to this revision, for example a deployment ID or timestamp.
511-
aRevisionChangeId :: Lens' ActionRevision Text
512-
aRevisionChangeId = lens _aRevisionChangeId (\ s a -> s{_aRevisionChangeId = a})
513-
514-
-- | The date and time when the most recent version of the action was created, in timestamp format.
515-
aCreated :: Lens' ActionRevision UTCTime
516-
aCreated = lens _aCreated (\ s a -> s{_aCreated = a}) . _Time
517-
518504
instance FromJSON ActionRevision where
519505
parseJSON
520506
= withObject "ActionRevision"
521507
(\ x ->
522-
ActionRevision' <$>
523-
(x .: "revisionId") <*> (x .: "revisionChangeId") <*>
524-
(x .: "created"))
508+
ActionRevision' <$> (x .: "revisionId"))
525509

526510
instance Hashable ActionRevision where
527511

@@ -531,9 +515,7 @@ instance ToJSON ActionRevision where
531515
toJSON ActionRevision'{..}
532516
= object
533517
(catMaybes
534-
[Just ("revisionId" .= _aRevisionId),
535-
Just ("revisionChangeId" .= _aRevisionChangeId),
536-
Just ("created" .= _aCreated)])
518+
[Just ("revisionId" .= _aRevisionId)])
537519

538520
-- | Represents information about the state of an action.
539521
--

0 commit comments

Comments
 (0)