diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,11 @@
 # Changelog for postgresql-pure
 
+## 0.1.2.0
+
+2019.10.21
+
+- Fix a compilation error with network ≧ 3.0.0.
+
 ## 0.1.1.0
 
 2019.10.21
diff --git a/postgresql-pure.cabal b/postgresql-pure.cabal
--- a/postgresql-pure.cabal
+++ b/postgresql-pure.cabal
@@ -4,10 +4,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 66e926e8e00816948836fb12c40af085773cf4e85b46359544cfacb18c35295c
+-- hash: 14ecd5f20820aca779a23760293ec281ed09841814409b6a8a5b26824c001e6d
 
 name:           postgresql-pure
-version:        0.1.1.0
+version:        0.1.2.0
 synopsis:       pure Haskell PostgreSQL driver
 description:    pure Haskell PostgreSQL driver
 category:       Database
diff --git a/src/Database/PostgreSQL/Pure/Internal/SocketIO.hs b/src/Database/PostgreSQL/Pure/Internal/SocketIO.hs
--- a/src/Database/PostgreSQL/Pure/Internal/SocketIO.hs
+++ b/src/Database/PostgreSQL/Pure/Internal/SocketIO.hs
@@ -106,7 +106,7 @@
 -- Before network 3.0.0.0, recvBuf raises error on EOF. Otherwise it returns 0 on EOF.
 recvBuf :: NS.Socket -> Ptr Word8 -> Int -> IO Int
 #if MIN_VERSION_network(3, 0, 0)
-recvBuf s ptr nbytes = NS.recvBuf s ptr nBytes
+recvBuf s ptr nbytes = NS.recvBuf s ptr nbytes
 #else
 recvBuf s ptr nbytes = do
   r <- tryJust (guard . isEOFError) $ NS.recvBuf s ptr nbytes