diff --git a/Network/Wai.hs b/Network/Wai.hs
--- a/Network/Wai.hs
+++ b/Network/Wai.hs
@@ -45,6 +45,7 @@
     , FilePart (..)
       -- * Response body smart constructors
     , responseLBS
+    , responseStatus
     ) where
 
 import qualified Data.ByteString as B
@@ -129,6 +130,13 @@
     | ResponseBuilder H.Status H.ResponseHeaders Builder
     | ResponseSource H.Status H.ResponseHeaders (C.Source IO (C.Flush Builder))
   deriving Typeable
+
+responseStatus :: Response -> H.Status
+responseStatus rsp =
+    case rsp of
+      ResponseFile    s _ _ _ -> s
+      ResponseBuilder s _ _   -> s
+      ResponseSource  s _ _   -> s
 
 data FilePart = FilePart
     { filePartOffset :: Integer
diff --git a/wai.cabal b/wai.cabal
--- a/wai.cabal
+++ b/wai.cabal
@@ -1,5 +1,5 @@
 Name:                wai
-Version:             1.1.0
+Version:             1.1.0.1
 Synopsis:            Web Application Interface.
 Description:         Provides a common protocol for communication between web applications and web servers.
 License:             BSD3
@@ -20,7 +20,7 @@
   Build-Depends:     base                      >= 4        && < 5
                    , bytestring                >= 0.9.1.4  && < 0.10
                    , blaze-builder             >= 0.2.1.4  && < 0.4
-                   , conduit                   >= 0.2
+                   , conduit                   >= 0.2      && < 0.3
                    , network                   >= 2.2.1.5  && < 2.4
                    , http-types                >= 0.6      && < 0.7
                    , text                      >= 0.7      && < 0.12
