amazonka-workspaces 1.3.7 → 1.4.0

raw patch · 18 files changed

+100/−76 lines, 18 filesdep ~amazonka-coredep ~amazonka-testdep ~amazonka-workspacesPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core, amazonka-test, amazonka-workspaces

API changes (from Hackage documentation)

Files

• README.md +2/−2
• amazonka-workspaces.cabal +7/−7
• gen/Network/AWS/WorkSpaces.hs +1/−3
• gen/Network/AWS/WorkSpaces/CreateWorkspaces.hs +8/−7
• gen/Network/AWS/WorkSpaces/DescribeWorkspaceBundles.hs +5/−5
• gen/Network/AWS/WorkSpaces/DescribeWorkspaceDirectories.hs +5/−5
• gen/Network/AWS/WorkSpaces/DescribeWorkspaces.hs +10/−10
• gen/Network/AWS/WorkSpaces/RebootWorkspaces.hs +5/−5
• gen/Network/AWS/WorkSpaces/RebuildWorkspaces.hs +5/−5
• gen/Network/AWS/WorkSpaces/TerminateWorkspaces.hs +5/−5
• gen/Network/AWS/WorkSpaces/Types.hs +2/−1
• gen/Network/AWS/WorkSpaces/Types/Product.hs +39/−15
• gen/Network/AWS/WorkSpaces/Types/Sum.hs +1/−1
• gen/Network/AWS/WorkSpaces/Waiters.hs +1/−1
• test/Main.hs +1/−1
• test/Test/AWS/Gen/WorkSpaces.hs +1/−1
• test/Test/AWS/WorkSpaces.hs +1/−1
• test/Test/AWS/WorkSpaces/Internal.hs +1/−1

@@ -8,7 +8,7 @@  ## Version -`1.3.7`+`1.4.0`   ## Description@@ -20,7 +20,7 @@ parameters, and errors.  Documentation is available via [Hackage](http://hackage.haskell.org/package/amazonka-workspaces)-and the [AWS API Reference](http://docs.aws.amazon.com/workspaces/latest/devguide/welcome.html).+and the [AWS API Reference](https://aws.amazon.com/documentation/).  The types from this library are intended to be used with [amazonka](http://hackage.haskell.org/package/amazonka), which provides mechanisms for specifying AuthN/AuthZ information and sending requests.

@@ -1,5 +1,5 @@ name:                  amazonka-workspaces-version:               1.3.7+version:               1.4.0 synopsis:              Amazon WorkSpaces SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -7,7 +7,7 @@ license-file:          LICENSE author:                Brendan Hay maintainer:            Brendan Hay <brendan.g.hay@gmail.com>-copyright:             Copyright (c) 2013-2015 Brendan Hay+copyright:             Copyright (c) 2013-2016 Brendan Hay category:              Network, AWS, Cloud, Distributed Computing build-type:            Simple cabal-version:         >= 1.10@@ -30,7 +30,7 @@     such as <http://hackage.haskell.org/package/lens lens> or     <http://hackage.haskell.org/package/lens-family-core lens-family-core>.     .-    See "Network.AWS.WorkSpaces" and the <http://docs.aws.amazon.com/workspaces/latest/devguide/welcome.html AWS API Reference>+    See "Network.AWS.WorkSpaces" or <https://aws.amazon.com/documentation/ the AWS Documentation>     to get started.  source-repository head@@ -60,7 +60,7 @@         , Network.AWS.WorkSpaces.Types.Sum      build-depends:-          amazonka-core == 1.3.7.*+          amazonka-core == 1.4.0.*         , base          >= 4.7     && < 5  test-suite amazonka-workspaces-test@@ -80,9 +80,9 @@         , Test.AWS.WorkSpaces.Internal      build-depends:-          amazonka-core == 1.3.7.*-        , amazonka-test == 1.3.7.*-        , amazonka-workspaces == 1.3.7.*+          amazonka-core == 1.4.0.*+        , amazonka-test == 1.4.0.*+        , amazonka-workspaces == 1.4.0.*         , base         , bytestring         , tasty

@@ -5,7 +5,7 @@  -- | -- Module      : Network.AWS.WorkSpaces--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -16,8 +16,6 @@ -- This is the /Amazon WorkSpaces API Reference/. This guide provides -- detailed information about Amazon WorkSpaces operations, data types, -- parameters, and errors.------ /See:/ <http://docs.aws.amazon.com/workspaces/latest/devguide/welcome.html AWS API Reference> module Network.AWS.WorkSpaces     (     -- * Service Configuration

@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.CreateWorkspaces--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -22,8 +22,6 @@ -- -- This operation is asynchronous and returns before the WorkSpaces are -- created.------ /See:/ <http://docs.aws.amazon.com/workspaces/latest/devguide/API_CreateWorkspaces.html AWS API Reference> for CreateWorkspaces. module Network.AWS.WorkSpaces.CreateWorkspaces     (     -- * Creating a Request@@ -48,7 +46,7 @@ import           Network.AWS.WorkSpaces.Types import           Network.AWS.WorkSpaces.Types.Product --- | Contains the inputs for the CreateWorkspaces operation.+-- | Contains the inputs for the < CreateWorkspaces> operation. -- -- /See:/ 'createWorkspaces' smart constructor. newtype CreateWorkspaces = CreateWorkspaces'@@ -83,6 +81,8 @@                      (x .?> "PendingRequests" .!@ mempty)                      <*> (pure (fromEnum s))) +instance Hashable CreateWorkspaces+ instance ToHeaders CreateWorkspaces where         toHeaders           = const@@ -103,7 +103,7 @@ instance ToQuery CreateWorkspaces where         toQuery = const mempty --- | Contains the result of the CreateWorkspaces operation.+-- | Contains the result of the < CreateWorkspaces> operation. -- -- /See:/ 'createWorkspacesResponse' smart constructor. data CreateWorkspacesResponse = CreateWorkspacesResponse'@@ -139,8 +139,9 @@ -- | An array of structures that represent the WorkSpaces that were created. -- -- Because this operation is asynchronous, the identifier in 'WorkspaceId'--- is not immediately available. If you immediately call DescribeWorkspaces--- with this identifier, no information will be returned.+-- is not immediately available. If you immediately call+-- < DescribeWorkspaces> with this identifier, no information will be+-- returned. cwrsPendingRequests :: Lens' CreateWorkspacesResponse [Workspace] cwrsPendingRequests = lens _cwrsPendingRequests (\ s a -> s{_cwrsPendingRequests = a}) . _Default . _Coerce; 

@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.DescribeWorkspaceBundles--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -28,8 +28,6 @@ -- request and response parameters. If more results are available, the -- 'NextToken' response member contains a token that you pass in the next -- call to this operation to retrieve the next set of items.------ /See:/ <http://docs.aws.amazon.com/workspaces/latest/devguide/API_DescribeWorkspaceBundles.html AWS API Reference> for DescribeWorkspaceBundles. module Network.AWS.WorkSpaces.DescribeWorkspaceBundles     (     -- * Creating a Request@@ -56,7 +54,7 @@ import           Network.AWS.WorkSpaces.Types import           Network.AWS.WorkSpaces.Types.Product --- | Contains the inputs for the DescribeWorkspaceBundles operation.+-- | Contains the inputs for the < DescribeWorkspaceBundles> operation. -- -- /See:/ 'describeWorkspaceBundles' smart constructor. data DescribeWorkspaceBundles = DescribeWorkspaceBundles'@@ -116,6 +114,8 @@                    (x .?> "Bundles" .!@ mempty) <*> (x .?> "NextToken")                      <*> (pure (fromEnum s))) +instance Hashable DescribeWorkspaceBundles+ instance ToHeaders DescribeWorkspaceBundles where         toHeaders           = const@@ -140,7 +140,7 @@ instance ToQuery DescribeWorkspaceBundles where         toQuery = const mempty --- | Contains the results of the DescribeWorkspaceBundles operation.+-- | Contains the results of the < DescribeWorkspaceBundles> operation. -- -- /See:/ 'describeWorkspaceBundlesResponse' smart constructor. data DescribeWorkspaceBundlesResponse = DescribeWorkspaceBundlesResponse'

@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.DescribeWorkspaceDirectories--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -26,8 +26,6 @@ -- request and response parameters. If more results are available, the -- 'NextToken' response member contains a token that you pass in the next -- call to this operation to retrieve the next set of items.------ /See:/ <http://docs.aws.amazon.com/workspaces/latest/devguide/API_DescribeWorkspaceDirectories.html AWS API Reference> for DescribeWorkspaceDirectories. module Network.AWS.WorkSpaces.DescribeWorkspaceDirectories     (     -- * Creating a Request@@ -53,7 +51,7 @@ import           Network.AWS.WorkSpaces.Types import           Network.AWS.WorkSpaces.Types.Product --- | Contains the inputs for the DescribeWorkspaceDirectories operation.+-- | Contains the inputs for the < DescribeWorkspaceDirectories> operation. -- -- /See:/ 'describeWorkspaceDirectories' smart constructor. data DescribeWorkspaceDirectories = DescribeWorkspaceDirectories'@@ -99,6 +97,8 @@                      (x .?> "NextToken")                      <*> (pure (fromEnum s))) +instance Hashable DescribeWorkspaceDirectories+ instance ToHeaders DescribeWorkspaceDirectories where         toHeaders           = const@@ -122,7 +122,7 @@ instance ToQuery DescribeWorkspaceDirectories where         toQuery = const mempty --- | Contains the results of the DescribeWorkspaceDirectories operation.+-- | Contains the results of the < DescribeWorkspaceDirectories> operation. -- -- /See:/ 'describeWorkspaceDirectoriesResponse' smart constructor. data DescribeWorkspaceDirectoriesResponse = DescribeWorkspaceDirectoriesResponse'

@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.DescribeWorkspaces--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -27,8 +27,6 @@ -- request and response parameters. If more results are available, the -- 'NextToken' response member contains a token that you pass in the next -- call to this operation to retrieve the next set of items.------ /See:/ <http://docs.aws.amazon.com/workspaces/latest/devguide/API_DescribeWorkspaces.html AWS API Reference> for DescribeWorkspaces. module Network.AWS.WorkSpaces.DescribeWorkspaces     (     -- * Creating a Request@@ -58,7 +56,7 @@ import           Network.AWS.WorkSpaces.Types import           Network.AWS.WorkSpaces.Types.Product --- | Contains the inputs for the DescribeWorkspaces operation.+-- | Contains the inputs for the < DescribeWorkspaces> operation. -- -- /See:/ 'describeWorkspaces' smart constructor. data DescribeWorkspaces = DescribeWorkspaces'@@ -108,10 +106,10 @@ -- which to retrieve information. This parameter cannot be combined with -- any other filter parameter. ----- Because the CreateWorkspaces operation is asynchronous, the identifier--- returned by CreateWorkspaces is not immediately available. If you--- immediately call DescribeWorkspaces with this identifier, no information--- will be returned.+-- Because the < CreateWorkspaces> operation is asynchronous, the+-- identifier returned by < CreateWorkspaces> is not immediately available.+-- If you immediately call < DescribeWorkspaces> with this identifier, no+-- information will be returned. dwWorkspaceIds :: Lens' DescribeWorkspaces (Maybe (NonEmpty Text)) dwWorkspaceIds = lens _dwWorkspaceIds (\ s a -> s{_dwWorkspaceIds = a}) . mapping _List1; @@ -147,6 +145,8 @@                      (x .?> "Workspaces" .!@ mempty)                      <*> (pure (fromEnum s))) +instance Hashable DescribeWorkspaces+ instance ToHeaders DescribeWorkspaces where         toHeaders           = const@@ -174,7 +174,7 @@ instance ToQuery DescribeWorkspaces where         toQuery = const mempty --- | Contains the results for the DescribeWorkspaces operation.+-- | Contains the results for the < DescribeWorkspaces> operation. -- -- /See:/ 'describeWorkspacesResponse' smart constructor. data DescribeWorkspacesResponse = DescribeWorkspacesResponse'@@ -212,7 +212,7 @@ -- | An array of structures that contain the information about the -- WorkSpaces. ----- Because the CreateWorkspaces operation is asynchronous, some of this+-- Because the < CreateWorkspaces> operation is asynchronous, some of this -- information may be incomplete for a newly-created WorkSpace. dwrsWorkspaces :: Lens' DescribeWorkspacesResponse [Workspace] dwrsWorkspaces = lens _dwrsWorkspaces (\ s a -> s{_dwrsWorkspaces = a}) . _Default . _Coerce;

@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.RebootWorkspaces--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -25,8 +25,6 @@ -- -- This operation is asynchronous and will return before the WorkSpaces -- have rebooted.------ /See:/ <http://docs.aws.amazon.com/workspaces/latest/devguide/API_RebootWorkspaces.html AWS API Reference> for RebootWorkspaces. module Network.AWS.WorkSpaces.RebootWorkspaces     (     -- * Creating a Request@@ -50,7 +48,7 @@ import           Network.AWS.WorkSpaces.Types import           Network.AWS.WorkSpaces.Types.Product --- | Contains the inputs for the RebootWorkspaces operation.+-- | Contains the inputs for the < RebootWorkspaces> operation. -- -- /See:/ 'rebootWorkspaces' smart constructor. newtype RebootWorkspaces = RebootWorkspaces'@@ -84,6 +82,8 @@                    (x .?> "FailedRequests" .!@ mempty) <*>                      (pure (fromEnum s))) +instance Hashable RebootWorkspaces+ instance ToHeaders RebootWorkspaces where         toHeaders           = const@@ -107,7 +107,7 @@ instance ToQuery RebootWorkspaces where         toQuery = const mempty --- | Contains the results of the RebootWorkspaces operation.+-- | Contains the results of the < RebootWorkspaces> operation. -- -- /See:/ 'rebootWorkspacesResponse' smart constructor. data RebootWorkspacesResponse = RebootWorkspacesResponse'

@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.RebuildWorkspaces--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -39,8 +39,6 @@ -- -- This operation is asynchronous and will return before the WorkSpaces -- have been completely rebuilt.------ /See:/ <http://docs.aws.amazon.com/workspaces/latest/devguide/API_RebuildWorkspaces.html AWS API Reference> for RebuildWorkspaces. module Network.AWS.WorkSpaces.RebuildWorkspaces     (     -- * Creating a Request@@ -64,7 +62,7 @@ import           Network.AWS.WorkSpaces.Types import           Network.AWS.WorkSpaces.Types.Product --- | Contains the inputs for the RebuildWorkspaces operation.+-- | Contains the inputs for the < RebuildWorkspaces> operation. -- -- /See:/ 'rebuildWorkspaces' smart constructor. newtype RebuildWorkspaces = RebuildWorkspaces'@@ -98,6 +96,8 @@                    (x .?> "FailedRequests" .!@ mempty) <*>                      (pure (fromEnum s))) +instance Hashable RebuildWorkspaces+ instance ToHeaders RebuildWorkspaces where         toHeaders           = const@@ -122,7 +122,7 @@ instance ToQuery RebuildWorkspaces where         toQuery = const mempty --- | Contains the results of the RebuildWorkspaces operation.+-- | Contains the results of the < RebuildWorkspaces> operation. -- -- /See:/ 'rebuildWorkspacesResponse' smart constructor. data RebuildWorkspacesResponse = RebuildWorkspacesResponse'

@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.TerminateWorkspaces--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -29,8 +29,6 @@ -- -- This operation is asynchronous and will return before the WorkSpaces -- have been completely terminated.------ /See:/ <http://docs.aws.amazon.com/workspaces/latest/devguide/API_TerminateWorkspaces.html AWS API Reference> for TerminateWorkspaces. module Network.AWS.WorkSpaces.TerminateWorkspaces     (     -- * Creating a Request@@ -54,7 +52,7 @@ import           Network.AWS.WorkSpaces.Types import           Network.AWS.WorkSpaces.Types.Product --- | Contains the inputs for the TerminateWorkspaces operation.+-- | Contains the inputs for the < TerminateWorkspaces> operation. -- -- /See:/ 'terminateWorkspaces' smart constructor. newtype TerminateWorkspaces = TerminateWorkspaces'@@ -89,6 +87,8 @@                    (x .?> "FailedRequests" .!@ mempty) <*>                      (pure (fromEnum s))) +instance Hashable TerminateWorkspaces+ instance ToHeaders TerminateWorkspaces where         toHeaders           = const@@ -113,7 +113,7 @@ instance ToQuery TerminateWorkspaces where         toQuery = const mempty --- | Contains the results of the TerminateWorkspaces operation.+-- | Contains the results of the < TerminateWorkspaces> operation. -- -- /See:/ 'terminateWorkspacesResponse' smart constructor. data TerminateWorkspacesResponse = TerminateWorkspacesResponse'

@@ -4,7 +4,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.Types--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -163,6 +163,7 @@         , _retryCheck = check         }     check e+      | has (hasStatus 429) e = Just "too_many_requests"       | has (hasCode "ThrottlingException" . hasStatus 400) e =           Just "throttling_exception"       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"

@@ -9,7 +9,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.Types.Product--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -49,6 +49,8 @@           = withObject "ComputeType"               (\ x -> ComputeType' <$> (x .:? "Name")) +instance Hashable ComputeType+ -- | Contains default WorkSpace creation information. -- -- /See:/ 'defaultWorkspaceCreationProperties' smart constructor.@@ -119,6 +121,8 @@                      <*> (x .:? "EnableInternetAccess")                      <*> (x .:? "DefaultOu")) +instance Hashable DefaultWorkspaceCreationProperties+ -- | Contains information about a WorkSpace that could not be created. -- -- /See:/ 'failedCreateWorkspaceRequest' smart constructor.@@ -146,7 +150,7 @@     , _fcwrErrorMessage = Nothing     } --- | A WorkspaceRequest object that contains the information about the+-- | A < WorkspaceRequest> object that contains the information about the -- WorkSpace that could not be created. fcwrWorkspaceRequest :: Lens' FailedCreateWorkspaceRequest (Maybe WorkspaceRequest) fcwrWorkspaceRequest = lens _fcwrWorkspaceRequest (\ s a -> s{_fcwrWorkspaceRequest = a});@@ -167,9 +171,11 @@                    (x .:? "WorkspaceRequest") <*> (x .:? "ErrorCode")                      <*> (x .:? "ErrorMessage")) +instance Hashable FailedCreateWorkspaceRequest+ -- | Contains information about a WorkSpace that could not be rebooted--- (RebootWorkspaces), rebuilt (RebuildWorkspaces), or terminated--- (TerminateWorkspaces).+-- (< RebootWorkspaces>), rebuilt (< RebuildWorkspaces>), or terminated+-- (< TerminateWorkspaces>). -- -- /See:/ 'failedWorkspaceChangeRequest' smart constructor. data FailedWorkspaceChangeRequest = FailedWorkspaceChangeRequest'@@ -216,8 +222,10 @@                    (x .:? "ErrorCode") <*> (x .:? "WorkspaceId") <*>                      (x .:? "ErrorMessage")) --- | Contains information used with the RebootWorkspaces operation to reboot--- a WorkSpace.+instance Hashable FailedWorkspaceChangeRequest++-- | Contains information used with the < RebootWorkspaces> operation to+-- reboot a WorkSpace. -- -- /See:/ 'rebootRequest' smart constructor. newtype RebootRequest = RebootRequest'@@ -241,12 +249,14 @@ rWorkspaceId :: Lens' RebootRequest Text rWorkspaceId = lens _rWorkspaceId (\ s a -> s{_rWorkspaceId = a}); +instance Hashable RebootRequest+ instance ToJSON RebootRequest where         toJSON RebootRequest'{..}           = object               (catMaybes [Just ("WorkspaceId" .= _rWorkspaceId)]) --- | Contains information used with the RebuildWorkspaces operation to+-- | Contains information used with the < RebuildWorkspaces> operation to -- rebuild a WorkSpace. -- -- /See:/ 'rebuildRequest' smart constructor.@@ -271,12 +281,14 @@ rrWorkspaceId :: Lens' RebuildRequest Text rrWorkspaceId = lens _rrWorkspaceId (\ s a -> s{_rrWorkspaceId = a}); +instance Hashable RebuildRequest+ instance ToJSON RebuildRequest where         toJSON RebuildRequest'{..}           = object               (catMaybes [Just ("WorkspaceId" .= _rrWorkspaceId)]) --- | Contains information used with the TerminateWorkspaces operation to+-- | Contains information used with the < TerminateWorkspaces> operation to -- terminate a WorkSpace. -- -- /See:/ 'terminateRequest' smart constructor.@@ -301,6 +313,8 @@ trWorkspaceId :: Lens' TerminateRequest Text trWorkspaceId = lens _trWorkspaceId (\ s a -> s{_trWorkspaceId = a}); +instance Hashable TerminateRequest+ instance ToJSON TerminateRequest where         toJSON TerminateRequest'{..}           = object@@ -334,6 +348,8 @@           = withObject "UserStorage"               (\ x -> UserStorage' <$> (x .:? "Capacity")) +instance Hashable UserStorage+ -- | Contains information about a WorkSpace. -- -- /See:/ 'workspace' smart constructor.@@ -475,6 +491,8 @@                      <*> (x .:? "UserVolumeEncryptionEnabled")                      <*> (x .:? "ErrorMessage")) +instance Hashable Workspace+ -- | Contains information about a WorkSpace bundle. -- -- /See:/ 'workspaceBundle' smart constructor.@@ -527,12 +545,12 @@ wbName :: Lens' WorkspaceBundle (Maybe Text) wbName = lens _wbName (\ s a -> s{_wbName = a}); --- | A ComputeType object that specifies the compute type for the bundle.+-- | A < ComputeType> object that specifies the compute type for the bundle. wbComputeType :: Lens' WorkspaceBundle (Maybe ComputeType) wbComputeType = lens _wbComputeType (\ s a -> s{_wbComputeType = a}); --- | A UserStorage object that specifies the amount of user storage that the--- bundle contains.+-- | A < UserStorage> object that specifies the amount of user storage that+-- the bundle contains. wbUserStorage :: Lens' WorkspaceBundle (Maybe UserStorage) wbUserStorage = lens _wbUserStorage (\ s a -> s{_wbUserStorage = a}); @@ -551,6 +569,8 @@                      <*> (x .:? "UserStorage")                      <*> (x .:? "Description")) +instance Hashable WorkspaceBundle+ -- | Contains information about an AWS Directory Service directory for use -- with Amazon WorkSpaces. --@@ -687,6 +707,8 @@                      <*> (x .:? "DnsIpAddresses" .!= mempty)                      <*> (x .:? "DirectoryName")) +instance Hashable WorkspaceDirectory+ -- | Contains information about a WorkSpace creation request. -- -- /See:/ 'workspaceRequest' smart constructor.@@ -744,8 +766,8 @@ wrUserVolumeEncryptionEnabled = lens _wrUserVolumeEncryptionEnabled (\ s a -> s{_wrUserVolumeEncryptionEnabled = a});  -- | The identifier of the AWS Directory Service directory to create the--- WorkSpace in. You can use the DescribeWorkspaceDirectories operation to--- obtain a list of the directories that are available.+-- WorkSpace in. You can use the < DescribeWorkspaceDirectories> operation+-- to obtain a list of the directories that are available. wrDirectoryId :: Lens' WorkspaceRequest Text wrDirectoryId = lens _wrDirectoryId (\ s a -> s{_wrDirectoryId = a}); @@ -756,8 +778,8 @@ wrUserName = lens _wrUserName (\ s a -> s{_wrUserName = a});  -- | The identifier of the bundle to create the WorkSpace from. You can use--- the DescribeWorkspaceBundles operation to obtain a list of the bundles--- that are available.+-- the < DescribeWorkspaceBundles> operation to obtain a list of the+-- bundles that are available. wrBundleId :: Lens' WorkspaceRequest Text wrBundleId = lens _wrBundleId (\ s a -> s{_wrBundleId = a}); @@ -772,6 +794,8 @@                      <*> (x .: "DirectoryId")                      <*> (x .: "UserName")                      <*> (x .: "BundleId"))++instance Hashable WorkspaceRequest  instance ToJSON WorkspaceRequest where         toJSON WorkspaceRequest'{..}

@@ -9,7 +9,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.Types.Sum--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated

@@ -7,7 +7,7 @@  -- | -- Module      : Network.AWS.WorkSpaces.Waiters--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated

@@ -2,7 +2,7 @@  -- | -- Module      : Main--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated

@@ -5,7 +5,7 @@  -- | -- Module      : Test.AWS.Gen.WorkSpaces--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated

@@ -1,7 +1,7 @@ {-# LANGUAGE OverloadedStrings #-}  -- Module      : Test.AWS.WorkSpaces--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 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

@@ -2,7 +2,7 @@ {-# OPTIONS_GHC -fno-warn-unused-imports #-}  -- Module      : Test.AWS.WorkSpaces.Internal--- Copyright   : (c) 2013-2015 Brendan Hay+-- Copyright   : (c) 2013-2016 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