commit ghc-HTTP for openSUSE:Factory
Hello community, here is the log from the commit of package ghc-HTTP for openSUSE:Factory checked in at 2016-01-28 17:23:50 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-HTTP (Old) and /work/SRC/openSUSE:Factory/.ghc-HTTP.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "ghc-HTTP" Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-HTTP/ghc-HTTP.changes 2016-01-08 15:23:02.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.ghc-HTTP.new/ghc-HTTP.changes 2016-01-28 17:24:42.000000000 +0100 @@ -1,0 +2,19 @@ +Sun Jan 24 10:04:26 UTC 2016 - mimi.vx@gmail.com + +- update to 4000.3.2 +* If the URI contains "user:pass@" part, use it for Basic Authorization +* Add a test harness. +* Don't leak a socket when getHostAddr throws an exception. +* Send cookies in request format, not response format. +* Moved BrowserAction to be a StateT IO, with instances for + Applicative, MonadIO, MonadState. +* Add method to control size of connection pool. +* Consider both host and port when reusing connections. +* Handle response code 304 "not modified" properly. +* Fix digest authentication by fixing md5 output string rep. +* Make the default user agent string follow the package version. +* Document lack of HTTPS support and fail when clients try + to use it instead of silently falling back to HTTP. +* Add helper to set the request type and body. + +------------------------------------------------------------------- Old: ---- HTTP-4000.2.23.tar.gz New: ---- HTTP-4000.3.2.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-HTTP.spec ++++++ --- /var/tmp/diff_new_pack.GyTEkh/_old 2016-01-28 17:24:43.000000000 +0100 +++ /var/tmp/diff_new_pack.GyTEkh/_new 2016-01-28 17:24:43.000000000 +0100 @@ -19,7 +19,7 @@ %global pkg_name HTTP Name: ghc-HTTP -Version: 4000.2.23 +Version: 4000.3.2 Release: 0 Summary: A library for client-side HTTP License: BSD-3-Clause @@ -37,7 +37,7 @@ BuildRequires: ghc-mtl-devel BuildRequires: ghc-network-devel BuildRequires: ghc-network-uri-devel -BuildRequires: ghc-old-time-devel +BuildRequires: ghc-time-devel BuildRequires: ghc-parsec-devel # End cabal-rpm deps ++++++ HTTP-4000.2.23.tar.gz -> HTTP-4000.3.2.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-4000.2.23/HTTP.cabal new/HTTP-4000.3.2/HTTP.cabal --- old/HTTP-4000.2.23/HTTP.cabal 2015-12-31 23:33:18.000000000 +0100 +++ new/HTTP-4000.3.2/HTTP.cabal 2016-01-16 09:57:23.000000000 +0100 @@ -1,5 +1,5 @@ Name: HTTP -Version: 4000.2.23 +Version: 4000.3.2 Cabal-Version: >= 1.8 Build-type: Simple License: BSD3 @@ -99,7 +99,8 @@ -- note the test harness constraints should be kept in sync with these -- where dependencies are shared Build-depends: base >= 4.3.0.0 && < 4.9, parsec >= 2.0 && < 3.2 - Build-depends: array >= 0.3.0.2 && < 0.6, old-time >= 1.0.0.0 && < 1.2, bytestring >= 0.9.1.5 && < 0.11 + Build-depends: array >= 0.3.0.2 && < 0.6, bytestring >= 0.9.1.5 && < 0.11 + Build-depends: time >= 1.1.2.3 && < 1.7 Extensions: FlexibleInstances @@ -114,8 +115,6 @@ else Build-depends: network >= 2.2.1.8 && < 2.6 - build-tools: ghc >= 7.0 && < 7.12 - if flag(warn-as-error) ghc-options: -Werror @@ -125,8 +124,6 @@ Test-Suite test type: exitcode-stdio-1.0 - build-tools: ghc >= 7.0 && < 7.12 - hs-source-dirs: test main-is: httpTests.hs diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-4000.2.23/Network/Browser.hs new/HTTP-4000.3.2/Network/Browser.hs --- old/HTTP-4000.2.23/Network/Browser.hs 2015-12-31 23:33:18.000000000 +0100 +++ new/HTTP-4000.3.2/Network/Browser.hs 2016-01-16 09:57:23.000000000 +0100 @@ -149,7 +149,7 @@ ( hSetBuffering, hPutStr, stdout, stdin, hGetChar , BufferMode(NoBuffering, LineBuffering) ) -import System.Time ( ClockTime, getClockTime ) +import Data.Time.Clock ( UTCTime, getCurrentTime ) ------------------------------------------------------------------ @@ -638,7 +638,7 @@ -- at which they occurred. data BrowserEvent = BrowserEvent - { browserTimestamp :: ClockTime + { browserTimestamp :: UTCTime , browserRequestID :: RequestID , browserRequestURI :: {-URI-}String , browserEventType :: BrowserEventType @@ -668,7 +668,7 @@ buildBrowserEvent :: BrowserEventType -> {-URI-}String -> RequestID -> IO BrowserEvent buildBrowserEvent bt uri reqID = do - ct <- getClockTime + ct <- getCurrentTime return BrowserEvent { browserTimestamp = ct , browserRequestID = reqID diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-4000.2.23/Network/TCP.hs new/HTTP-4000.3.2/Network/TCP.hs --- old/HTTP-4000.2.23/Network/TCP.hs 2015-12-31 23:33:18.000000000 +0100 +++ new/HTTP-4000.3.2/Network/TCP.hs 2016-01-16 09:57:23.000000000 +0100 @@ -306,14 +306,7 @@ -- and that the connection peer matches the given -- host name (which is recorded locally). isConnectedTo :: Connection -> EndPoint -> IO Bool -isConnectedTo (Connection conn) endPoint = do - v <- readMVar (getRef conn) - case v of - ConnClosed -> print "aa" >> return False - _ - | connEndPoint v == endPoint -> - catchIO (getPeerName (connSock v) >> return True) (const $ return False) - | otherwise -> return False +isConnectedTo (Connection conn) endPoint = isTCPConnectedTo conn endPoint isTCPConnectedTo :: HandleStream ty -> EndPoint -> IO Bool isTCPConnectedTo conn endPoint = do
participants (1)
-
root@hilbert.suse.de