diff --git a/Web/Twitter/Conduit/Base.hs b/Web/Twitter/Conduit/Base.hs
--- a/Web/Twitter/Conduit/Base.hs
+++ b/Web/Twitter/Conduit/Base.hs
@@ -68,11 +68,10 @@
              -> IO HTTP.Request
 makeRequest' m url query = do
     req <- HTTP.parseUrl url
-    let params = HT.renderSimpleQuery False query
-        addParams =
+    let addParams =
             if m == "POST"
             then HTTP.urlEncodedBody query
-            else \r -> r { HTTP.queryString = params }
+            else \r -> r { HTTP.queryString = HT.renderSimpleQuery False query }
     return $ addParams $ req { HTTP.method = m
                              , HTTP.checkStatus = \_ _ _ -> Nothing
                              }
diff --git a/Web/Twitter/Conduit/Types.hs b/Web/Twitter/Conduit/Types.hs
--- a/Web/Twitter/Conduit/Types.hs
+++ b/Web/Twitter/Conduit/Types.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE DeriveDataTypeable #-}
 module Web.Twitter.Conduit.Types
        ( TWToken (..)
        , TWInfo (..)
@@ -6,20 +7,21 @@
        ) where
 
 import Data.Default
+import Data.Typeable (Typeable)
 import Web.Authenticate.OAuth
 import Network.HTTP.Conduit
 
 data TWToken = TWToken
     { twOAuth :: OAuth
     , twCredential :: Credential
-    } deriving (Show, Eq)
+    } deriving (Show, Read, Eq, Typeable)
 instance Default TWToken where
     def = TWToken twitterOAuth (Credential [])
 
 data TWInfo = TWInfo
     { twToken :: TWToken
     , twProxy :: Maybe Proxy
-    } deriving (Show, Eq)
+    } deriving (Show, Read, Eq, Typeable)
 instance Default TWInfo where
     def = TWInfo
         { twToken = def
diff --git a/twitter-conduit.cabal b/twitter-conduit.cabal
--- a/twitter-conduit.cabal
+++ b/twitter-conduit.cabal
@@ -1,5 +1,5 @@
 name:              twitter-conduit
-version:           0.1.2
+version:           0.1.3
 license:           BSD3
 license-file:      LICENSE
 author:            HATTORI Hiroki, Hideyuki Tanaka, Takahiro HIMURA