diff --git a/http-streams.cabal b/http-streams.cabal
--- a/http-streams.cabal
+++ b/http-streams.cabal
@@ -1,6 +1,6 @@
 cabal-version:       >= 1.10
 name:                http-streams
-version:             0.6.0.0
+version:             0.6.0.1
 synopsis:            An HTTP client using io-streams
 description:
  /Overview/
diff --git a/src/Network/Http/RequestBuilder.hs b/src/Network/Http/RequestBuilder.hs
--- a/src/Network/Http/RequestBuilder.hs
+++ b/src/Network/Http/RequestBuilder.hs
@@ -100,9 +100,8 @@
 
     let e  = case m of
             GET   -> Empty
-            POST  -> Chunking
-            PUT   -> Chunking
-            _     -> Empty
+            TRACE -> Empty
+            _     -> Chunking
 
     let h3 = case e of
             Chunking    -> updateHeader h2 "Transfer-Encoding" "chunked"
diff --git a/src/Network/Http/ResponseParser.hs b/src/Network/Http/ResponseParser.hs
--- a/src/Network/Http/ResponseParser.hs
+++ b/src/Network/Http/ResponseParser.hs
@@ -136,10 +136,14 @@
     c = pContentEncoding p
     l = pContentLength p
 
+
 readDecimal :: (Enum α, Num α, Bits α) => ByteString -> α
-readDecimal = S.foldl' f 0
+readDecimal str' =
+    S.foldl' f 0 x'
   where
     f !cnt !i = cnt * 10 + digitToInt i
+
+    x' = head $ S.words str'
 
     {-# INLINE digitToInt #-}
     digitToInt :: (Enum α, Num α, Bits α) => Char -> α