diff --git a/HTTP.cabal b/HTTP.cabal
--- a/HTTP.cabal
+++ b/HTTP.cabal
@@ -1,5 +1,5 @@
 Name: HTTP
-Version: 3001.0.2
+Version: 3001.0.3
 Cabal-Version: >= 1.2
 Build-type: Simple
 License: BSD3
diff --git a/Network/Stream.hs b/Network/Stream.hs
--- a/Network/Stream.hs
+++ b/Network/Stream.hs
@@ -128,6 +128,7 @@
     close sk = shutdown sk ShutdownBoth >> sClose sk
 
 myrecv :: Socket -> Int -> IO String
+myrecv _ 0 = return ""
 myrecv sock len =
     let handler e = if isEOFError e then return [] else ioError e
         in System.IO.Error.catch (recv sock len) handler