diff --git a/amazonka-rds.cabal b/amazonka-rds.cabal
--- a/amazonka-rds.cabal
+++ b/amazonka-rds.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-rds
-version:               0.0.0
+version:               0.0.1
 synopsis:              Amazon Relational Database Service SDK.
 homepage:              https://github.com/brendanhay/amazonka
 license:               OtherLicense
@@ -95,5 +95,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/RDS/DescribeEvents.hs b/gen/Network/AWS/RDS/DescribeEvents.hs
--- a/gen/Network/AWS/RDS/DescribeEvents.hs
+++ b/gen/Network/AWS/RDS/DescribeEvents.hs
@@ -66,7 +66,7 @@
     , _deMarker           :: Maybe Text
     , _deMaxRecords       :: Maybe Int
     , _deSourceIdentifier :: Maybe Text
-    , _deSourceType       :: Maybe Text
+    , _deSourceType       :: Maybe SourceType
     , _deStartTime        :: Maybe RFC822
     } deriving (Eq, Show)
 
@@ -88,7 +88,7 @@
 --
 -- * 'deSourceIdentifier' @::@ 'Maybe' 'Text'
 --
--- * 'deSourceType' @::@ 'Maybe' 'Text'
+-- * 'deSourceType' @::@ 'Maybe' 'SourceType'
 --
 -- * 'deStartTime' @::@ 'Maybe' 'UTCTime'
 --
@@ -154,7 +154,7 @@
 
 -- | The event source to retrieve events for. If no value is specified, all
 -- events are returned.
-deSourceType :: Lens' DescribeEvents (Maybe Text)
+deSourceType :: Lens' DescribeEvents (Maybe SourceType)
 deSourceType = lens _deSourceType (\s a -> s { _deSourceType = a })
 
 -- | The beginning of the time interval to retrieve events for, specified in
diff --git a/gen/Network/AWS/RDS/Types.hs b/gen/Network/AWS/RDS/Types.hs
--- a/gen/Network/AWS/RDS/Types.hs
+++ b/gen/Network/AWS/RDS/Types.hs
@@ -586,8 +586,8 @@
     , _eEventCategories  :: List "EventCategory" Text
     , _eMessage          :: Maybe Text
     , _eSourceIdentifier :: Maybe Text
-    , _eSourceType       :: Maybe Text
-    } deriving (Eq, Ord, Show)
+    , _eSourceType       :: Maybe SourceType
+    } deriving (Eq, Show)
 
 -- | 'Event' constructor.
 --
@@ -601,7 +601,7 @@
 --
 -- * 'eSourceIdentifier' @::@ 'Maybe' 'Text'
 --
--- * 'eSourceType' @::@ 'Maybe' 'Text'
+-- * 'eSourceType' @::@ 'Maybe' 'SourceType'
 --
 event :: Event
 event = Event
@@ -630,7 +630,7 @@
     lens _eSourceIdentifier (\s a -> s { _eSourceIdentifier = a })
 
 -- | Specifies the source type for this event.
-eSourceType :: Lens' Event (Maybe Text)
+eSourceType :: Lens' Event (Maybe SourceType)
 eSourceType = lens _eSourceType (\s a -> s { _eSourceType = a })
 
 instance FromXML Event where
@@ -1242,11 +1242,13 @@
         DbSecurityGroup  -> "db-security-group"
         DbSnapshot       -> "db-snapshot"
 
+instance ToByteString SourceType
+instance ToHeader     SourceType
+instance ToQuery      SourceType
+
 instance FromXML SourceType where
     parseXML = parseXMLText "SourceType"
 
-instance ToQuery SourceType where
-    toQuery = toQuery . toText
 
 data DBParameterGroup = DBParameterGroup
     { _dbpgDBParameterGroupFamily :: Maybe Text
@@ -1443,11 +1445,13 @@
         Immediate     -> "immediate"
         PendingReboot -> "pending-reboot"
 
+instance ToByteString ApplyMethod
+instance ToHeader     ApplyMethod
+instance ToQuery      ApplyMethod
+
 instance FromXML ApplyMethod where
     parseXML = parseXMLText "ApplyMethod"
 
-instance ToQuery ApplyMethod where
-    toQuery = toQuery . toText
 
 data CharacterSet = CharacterSet
     { _csCharacterSetDescription :: Maybe Text
@@ -3514,7 +3518,7 @@
 
 data Parameter = Parameter
     { _pAllowedValues        :: Maybe Text
-    , _pApplyMethod          :: Maybe Text
+    , _pApplyMethod          :: Maybe ApplyMethod
     , _pApplyType            :: Maybe Text
     , _pDataType             :: Maybe Text
     , _pDescription          :: Maybe Text
@@ -3523,7 +3527,7 @@
     , _pParameterName        :: Maybe Text
     , _pParameterValue       :: Maybe Text
     , _pSource               :: Maybe Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Show)
 
 -- | 'Parameter' constructor.
 --
@@ -3531,7 +3535,7 @@
 --
 -- * 'pAllowedValues' @::@ 'Maybe' 'Text'
 --
--- * 'pApplyMethod' @::@ 'Maybe' 'Text'
+-- * 'pApplyMethod' @::@ 'Maybe' 'ApplyMethod'
 --
 -- * 'pApplyType' @::@ 'Maybe' 'Text'
 --
@@ -3568,7 +3572,7 @@
 pAllowedValues = lens _pAllowedValues (\s a -> s { _pAllowedValues = a })
 
 -- | Indicates when to apply parameter updates.
-pApplyMethod :: Lens' Parameter (Maybe Text)
+pApplyMethod :: Lens' Parameter (Maybe ApplyMethod)
 pApplyMethod = lens _pApplyMethod (\s a -> s { _pApplyMethod = a })
 
 -- | Specifies the engine specific parameters type.
