diff --git a/openid.cabal b/openid.cabal
--- a/openid.cabal
+++ b/openid.cabal
@@ -1,5 +1,5 @@
 name:               openid
-version:            0.2.0.0
+version:            0.2.0.1
 cabal-version:      >= 1.8
 synopsis:           An implementation of the OpenID-2.0 spec.
 description:        An implementation of the OpenID-2.0 spec.
@@ -31,7 +31,7 @@
                    containers >= 0.2.0.0  && < 0.4.1.0,
                    HTTP       >= 4000.0.9 && < 4000.2,
                    monadLib   >= 3.6.0.0  && < 3.7.0.0,
-                   network    >= 2.2.0.0  && < 2.3.0.0,
+                   network    >= 2.2.0.0  && < 2.4.0.0,
                    time       >= 1.1.0.0  && < 1.3.0.0,
                    xml        >= 1.3.0.0  && < 1.4.0.0,
                    HsOpenSSL  >= 0.9.0.0  && < 0.11.0.0
@@ -63,6 +63,7 @@
 
 executable openid-test
   main-is:         examples/test.hs
+  ghc-options:     -threaded
 
   if flag(examples)
     buildable:     True
diff --git a/src/Network/OpenID/HTTP.hs b/src/Network/OpenID/HTTP.hs
--- a/src/Network/OpenID/HTTP.hs
+++ b/src/Network/OpenID/HTTP.hs
@@ -57,7 +57,7 @@
     connect sock $ SockAddrInet port $ head $ hostAddresses hi
     ersp <- if uriScheme (rqURI req) == "https:"
               then inBase $ do
-                mb_sh <- inBase (sslConnect sock)
+                mb_sh <- sslConnect sock
                 case mb_sh of
                   Nothing -> return $ Left $ ErrorMisc "sslConnect failed"
                   Just sh -> simpleHTTP_ sh normReq