diff --git a/network-transport-tcp.cabal b/network-transport-tcp.cabal
--- a/network-transport-tcp.cabal
+++ b/network-transport-tcp.cabal
@@ -1,5 +1,5 @@
 Name:          network-transport-tcp
-Version:       0.2.0
+Version:       0.2.0.1
 Cabal-Version: >=1.8
 Build-Type:    Simple
 License:       BSD3 
diff --git a/src/Network/Transport/TCP/Internal.hs b/src/Network/Transport/TCP/Internal.hs
--- a/src/Network/Transport/TCP/Internal.hs
+++ b/src/Network/Transport/TCP/Internal.hs
@@ -104,7 +104,7 @@
 recvExact :: N.Socket                -- ^ Socket to read from 
           -> Int32                   -- ^ Number of bytes to read
           -> IO [ByteString]
-recvExact _ len | len <= 0 = throwIO (userError "recvExact: Negative length") 
+recvExact _ len | len < 0 = throwIO (userError "recvExact: Negative length") 
 recvExact sock len = go [] len
   where
     go :: [ByteString] -> Int32 -> IO [ByteString]