diff --git a/oauthenticated.cabal b/oauthenticated.cabal
--- a/oauthenticated.cabal
+++ b/oauthenticated.cabal
@@ -1,5 +1,5 @@
 name:                oauthenticated
-version:             0.0.4
+version:             0.0.5
 synopsis:            Simple OAuth client code built atop http-conduit
 
 description:         
@@ -61,7 +61,6 @@
                      , crypto-random
                      , cryptohash
                      , http-client
-                     , http-client-tls
                      , http-types
                      , exceptions
                      , mtl
diff --git a/src/Network/OAuth/Stateful.hs b/src/Network/OAuth/Stateful.hs
--- a/src/Network/OAuth/Stateful.hs
+++ b/src/Network/OAuth/Stateful.hs
@@ -25,7 +25,7 @@
   oauth, sign, newParams,
 
   -- * OAuth State
-  withGen, withManager, withCred, getServer, getCredentials, createCredential
+  withGen, withManager, withCred, getServer, getCredentials, 
 
   )
   where
@@ -115,12 +115,6 @@
 
 getCredentials :: Monad m => OAuthT ty m (Cred ty)
 getCredentials = OAuthT (use credentials)
-
-createCredential :: Monad m => Token ty' -> OAuthT ty m (Cred ty')
-createCredential tok = do
-  cc <- getCredentials
-  let clientTok = view clientToken cc
-  return $ set resourceToken (clientCred clientTok) tok
 
 manager :: Lens (OAuthConfig ty) (OAuthConfig ty) Manager Manager
 manager inj (OAuthConfig m rng sv c) = (\m' -> OAuthConfig m' rng sv c) <$> inj m