Hello community,

here is the log from the commit of package ghc-HTTP for openSUSE:Factory 
checked in at 2019-06-19 21:10:07
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-HTTP (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-HTTP.new.4811 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-HTTP"

Wed Jun 19 21:10:07 2019 rev:24 rq:710617 version:4000.3.14

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-HTTP/ghc-HTTP.changes        2019-04-03 
09:27:00.111786604 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-HTTP.new.4811/ghc-HTTP.changes      
2019-06-19 21:11:40.778700489 +0200
@@ -1,0 +2,12 @@
+Tue Jun 18 02:01:48 UTC 2019 - psim...@suse.com
+
+- Update HTTP to version 4000.3.14.
+  Upstream has not updated the file "CHANGES" since the last
+  release.
+
+-------------------------------------------------------------------
+Tue Jun 11 14:29:06 UTC 2019 - Peter Simons <psim...@suse.com>
+
+- Update Cabal file for more accurate build dependencies.
+
+-------------------------------------------------------------------

Old:
----
  HTTP-4000.3.13.tar.gz

New:
----
  HTTP-4000.3.14.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ ghc-HTTP.spec ++++++
--- /var/tmp/diff_new_pack.Lu6q1p/_old  2019-06-19 21:11:42.594702254 +0200
+++ /var/tmp/diff_new_pack.Lu6q1p/_new  2019-06-19 21:11:42.598702257 +0200
@@ -19,7 +19,7 @@
 %global pkg_name HTTP
 %bcond_with tests
 Name:           ghc-%{pkg_name}
-Version:        4000.3.13
+Version:        4000.3.14
 Release:        0
 Summary:        A library for client-side HTTP
 License:        BSD-3-Clause

++++++ HTTP-4000.3.13.tar.gz -> HTTP-4000.3.14.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/HTTP-4000.3.13/HTTP.cabal 
new/HTTP-4000.3.14/HTTP.cabal
--- old/HTTP-4000.3.13/HTTP.cabal       2019-03-17 12:46:06.000000000 +0100
+++ new/HTTP-4000.3.14/HTTP.cabal       2019-06-17 23:33:27.000000000 +0200
@@ -1,5 +1,5 @@
 Name: HTTP
-Version: 4000.3.13
+Version: 4000.3.14
 Cabal-Version: >= 1.8
 Build-type: Simple
 License: BSD3
@@ -109,7 +109,7 @@
 
   -- note the test harness constraints should be kept in sync with these
   -- where dependencies are shared
-  Build-depends: base >= 4.3.0.0 && < 4.13, parsec >= 2.0 && < 3.2
+  Build-depends: base >= 4.3.0.0 && < 4.14, parsec >= 2.0 && < 3.2
   Build-depends: array >= 0.3.0.2 && < 0.6, bytestring >= 0.9.1.5 && < 0.11
   Build-depends: time >= 1.1.2.3 && < 1.10
 
@@ -122,7 +122,7 @@
     Build-depends: mtl >= 2.0 && < 2.3
 
   if flag(network-uri)
-    Build-depends: network-uri == 2.6.*, network >= 2.6 && < 3.1
+    Build-depends: network-uri == 2.6.*, network >= 2.6 && < 3.2
   else
     Build-depends: network >= 2.4 && < 2.6
 
@@ -151,13 +151,13 @@
                      bytestring >= 0.9.1.5 && < 0.11,
                      deepseq >= 1.3.0.0 && < 1.5,
                      pureMD5 >= 0.2.4 && < 2.2,
-                     base >= 4.3.0.0 && < 4.13,
+                     base >= 4.3.0.0 && < 4.14,
                      split >= 0.1.3 && < 0.3,
                      test-framework >= 0.2.0 && < 0.9,
                      test-framework-hunit >= 0.3.0 && <0.4
 
   if flag(network-uri)
-    Build-depends: network-uri == 2.6.*, network >= 2.6 && < 3.1
+    Build-depends: network-uri == 2.6.*, network >= 2.6 && < 3.2
   else
     Build-depends: network >= 2.3 && < 2.6
 
@@ -176,5 +176,3 @@
       build-depends:
                          conduit >= 1.1 && < 1.4,
                          conduit-extra >= 1.1 && < 1.4
-
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/HTTP-4000.3.13/Network/Browser.hs 
new/HTTP-4000.3.14/Network/Browser.hs
--- old/HTTP-4000.3.13/Network/Browser.hs       2019-03-17 12:46:06.000000000 
+0100
+++ new/HTTP-4000.3.14/Network/Browser.hs       2019-06-17 23:33:27.000000000 
+0200
@@ -133,6 +133,9 @@
 
 import Network.Stream ( ConnError(..), Result )
 import Network.BufferType
+#if (MIN_VERSION_base(4,9,0)) && !(MIN_VERSION_base(4,13,0))
+import Control.Monad.Fail
+#endif
 
 import Data.Char (toLower)
 import Data.List (isPrefixOf)
@@ -422,7 +425,12 @@
   pure  = return
   (<*>) = ap
 #else
- deriving (Functor, Applicative, Monad, MonadIO, MonadState (BrowserState 
conn))
+ deriving
+ ( Functor, Applicative, Monad, MonadIO, MonadState (BrowserState conn)
+#if MIN_VERSION_base(4,9,0)
+ , MonadFail
+#endif
+ )
 #endif
 
 runBA :: BrowserState conn -> BrowserAction conn a -> IO a
@@ -720,7 +728,7 @@
     Left e  -> do
      let errStr = ("Network.Browser.request: Error raised " ++ show e)
      err errStr
-     fail errStr
+     Prelude.fail errStr
  where
   initialState = nullRequestState
   nullVal      = buf_empty bufferOps
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/HTTP-4000.3.13/Network/HTTP/Base.hs 
new/HTTP-4000.3.14/Network/HTTP/Base.hs
--- old/HTTP-4000.3.13/Network/HTTP/Base.hs     2019-03-17 12:46:06.000000000 
+0100
+++ new/HTTP-4000.3.14/Network/HTTP/Base.hs     2019-06-17 23:33:27.000000000 
+0200
@@ -1,4 +1,4 @@
-{-# LANGUAGE ScopedTypeVariables #-}
+{-# LANGUAGE CPP, ScopedTypeVariables #-}
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Network.HTTP.Base
@@ -209,7 +209,11 @@
   default_http  = 80
   default_https = 443
 
+#if MIN_VERSION_base(4,13,0)
+failHTTPS :: MonadFail m => URI -> m ()
+#else
 failHTTPS :: Monad m => URI -> m ()
+#endif
 failHTTPS uri
   | map toLower (uriScheme uri) == "https:" = fail "https not supported"
   | otherwise = return ()
@@ -713,7 +717,11 @@
 
 -- | @getAuth req@ fishes out the authority portion of the URL in a request's 
@Host@
 -- header.
+#if MIN_VERSION_base(4,13,0)
+getAuth :: MonadFail m => Request ty -> m URIAuthority
+#else
 getAuth :: Monad m => Request ty -> m URIAuthority
+#endif
 getAuth r = 
    -- ToDo: verify that Network.URI functionality doesn't take care of this 
(now.)
   case parseURIAuthority auth of


Reply via email to