diff --git a/amazonka-datapipeline.cabal b/amazonka-datapipeline.cabal
--- a/amazonka-datapipeline.cabal
+++ b/amazonka-datapipeline.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-datapipeline
-version:               0.0.0
+version:               0.0.1
 synopsis:              Amazon Data Pipeline SDK.
 homepage:              https://github.com/brendanhay/amazonka
 license:               OtherLicense
@@ -56,5 +56,5 @@
     other-modules:
 
     build-depends:
-          amazonka-core
-        , base          >= 4.7 && < 5
+          amazonka-core == 0.0.1.*
+        , base          >= 4.7     && < 5
diff --git a/gen/Network/AWS/DataPipeline/SetTaskStatus.hs b/gen/Network/AWS/DataPipeline/SetTaskStatus.hs
--- a/gen/Network/AWS/DataPipeline/SetTaskStatus.hs
+++ b/gen/Network/AWS/DataPipeline/SetTaskStatus.hs
@@ -56,8 +56,8 @@
     , _stsErrorMessage    :: Maybe Text
     , _stsErrorStackTrace :: Maybe Text
     , _stsTaskId          :: Text
-    , _stsTaskStatus      :: Text
-    } deriving (Eq, Ord, Show)
+    , _stsTaskStatus      :: TaskStatus
+    } deriving (Eq, Show)
 
 -- | 'SetTaskStatus' constructor.
 --
@@ -71,10 +71,10 @@
 --
 -- * 'stsTaskId' @::@ 'Text'
 --
--- * 'stsTaskStatus' @::@ 'Text'
+-- * 'stsTaskStatus' @::@ 'TaskStatus'
 --
 setTaskStatus :: Text -- ^ 'stsTaskId'
-              -> Text -- ^ 'stsTaskStatus'
+              -> TaskStatus -- ^ 'stsTaskStatus'
               -> SetTaskStatus
 setTaskStatus p1 p2 = SetTaskStatus
     { _stsTaskId          = p1
@@ -113,7 +113,7 @@
 
 -- | If FINISHED, the task successfully completed. If FAILED the task ended
 -- unsuccessfully. The FALSE value is used by preconditions.
-stsTaskStatus :: Lens' SetTaskStatus Text
+stsTaskStatus :: Lens' SetTaskStatus TaskStatus
 stsTaskStatus = lens _stsTaskStatus (\s a -> s { _stsTaskStatus = a })
 
 data SetTaskStatusResponse = SetTaskStatusResponse
diff --git a/gen/Network/AWS/DataPipeline/Types.hs b/gen/Network/AWS/DataPipeline/Types.hs
--- a/gen/Network/AWS/DataPipeline/Types.hs
+++ b/gen/Network/AWS/DataPipeline/Types.hs
@@ -269,15 +269,15 @@
         ]
 
 data Operator = Operator
-    { _oType   :: Maybe Text
+    { _oType   :: Maybe OperatorType
     , _oValues :: List "values" Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Show)
 
 -- | 'Operator' constructor.
 --
 -- The fields accessible through corresponding lenses are:
 --
--- * 'oType' @::@ 'Maybe' 'Text'
+-- * 'oType' @::@ 'Maybe' 'OperatorType'
 --
 -- * 'oValues' @::@ ['Text']
 --
@@ -302,7 +302,7 @@
 -- choose names containing only alpha-numeric values, as symbols may be
 -- reserved by AWS Data Pipeline. User-defined fields that you add to a
 -- pipeline should prefix their name with the string "my".
-oType :: Lens' Operator (Maybe Text)
+oType :: Lens' Operator (Maybe OperatorType)
 oType = lens _oType (\s a -> s { _oType = a })
 
 -- | The value that the actual field value will be compared with.
@@ -582,6 +582,10 @@
         OperatorLe      -> "LE"
         OperatorRefEq   -> "REF_EQ"
 
+instance ToByteString OperatorType
+instance ToHeader     OperatorType
+instance ToQuery      OperatorType
+
 instance FromJSON OperatorType where
     parseJSON = parseJSONText "OperatorType"
 
@@ -645,6 +649,10 @@
         Failed   -> "FAILED"
         False'   -> "FALSE"
         Finished -> "FINISHED"
+
+instance ToByteString TaskStatus
+instance ToHeader     TaskStatus
+instance ToQuery      TaskStatus
 
 instance FromJSON TaskStatus where
     parseJSON = parseJSONText "TaskStatus"