Hello community,

here is the log from the commit of package ghc-streaming-commons for 
openSUSE:Factory checked in at 2015-08-10 09:15:56
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-streaming-commons (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-streaming-commons.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-streaming-commons"

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/ghc-streaming-commons/ghc-streaming-commons.changes  
    2015-05-27 12:46:23.000000000 +0200
+++ 
/work/SRC/openSUSE:Factory/.ghc-streaming-commons.new/ghc-streaming-commons.changes
 2015-08-10 09:15:57.000000000 +0200
@@ -1,0 +2,6 @@
+Fri Aug  7 08:08:51 UTC 2015 - mimi...@gmail.com
+
+- update to 0.1.12.1
+* Fix up acceptSafe
+
+-------------------------------------------------------------------

Old:
----
  streaming-commons-0.1.12.tar.gz

New:
----
  streaming-commons-0.1.12.1.tar.gz

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

Other differences:
------------------
++++++ ghc-streaming-commons.spec ++++++
--- /var/tmp/diff_new_pack.dbMQW7/_old  2015-08-10 09:15:58.000000000 +0200
+++ /var/tmp/diff_new_pack.dbMQW7/_new  2015-08-10 09:15:58.000000000 +0200
@@ -15,17 +15,18 @@
 # Please submit bugfixes or comments via http://bugs.opensuse.org/
 #
 
+
 %global pkg_name streaming-commons
 
 %bcond_with tests
 
-Name:           ghc-%{pkg_name}
-Version:        0.1.12
+Name:           ghc-streaming-commons
+Version:        0.1.12.1
 Release:        0
 Summary:        Common lower-level functions needed by various streaming data 
libraries
+License:        MIT
 Group:          System/Libraries
 
-License:        MIT
 Url:            https://hackage.haskell.org/package/%{pkg_name}
 Source0:        
https://hackage.haskell.org/package/%{pkg_name}-%{version}/%{pkg_name}-%{version}.tar.gz
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
@@ -74,37 +75,29 @@
 %prep
 %setup -q -n %{pkg_name}-%{version}
 
-
 %build
 %ghc_lib_build
 
-
 %install
 %ghc_lib_install
 
-
 %check
 %if %{with tests}
 %cabal test
 %endif
 
-
 %post devel
 %ghc_pkg_recache
 
-
 %postun devel
 %ghc_pkg_recache
 
-
 %files -f %{name}.files
 %defattr(-,root,root,-)
 %doc LICENSE
 
-
 %files devel -f %{name}-devel.files
 %defattr(-,root,root,-)
 %doc README.md
 
-
 %changelog

++++++ streaming-commons-0.1.12.tar.gz -> streaming-commons-0.1.12.1.tar.gz 
++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/streaming-commons-0.1.12/ChangeLog.md 
new/streaming-commons-0.1.12.1/ChangeLog.md
--- old/streaming-commons-0.1.12/ChangeLog.md   2015-04-14 06:45:05.000000000 
+0200
+++ new/streaming-commons-0.1.12.1/ChangeLog.md 2015-05-15 06:29:28.000000000 
+0200
@@ -1,3 +1,7 @@
+## 0.1.12.1
+
+* Fix up `acceptSafe` as [mentioned by 
Kazu](https://github.com/yesodweb/wai/issues/361#issuecomment-102204803)
+
 ## 0.1.12
 
 * `appRawSocket`
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/streaming-commons-0.1.12/Data/Streaming/Network.hs 
new/streaming-commons-0.1.12.1/Data/Streaming/Network.hs
--- old/streaming-commons-0.1.12/Data/Streaming/Network.hs      2015-04-14 
06:45:05.000000000 +0200
+++ new/streaming-commons-0.1.12.1/Data/Streaming/Network.hs    2015-05-15 
06:29:28.000000000 +0200
@@ -106,6 +106,7 @@
 import Data.Array.Unboxed ((!), UArray, listArray)
 import System.IO.Unsafe (unsafePerformIO)
 import System.Random (randomRIO)
+import System.IO.Error (isFullErrorType, ioeGetErrorType)
 #if WINDOWS
 import Control.Concurrent.MVar (putMVar, takeMVar, newEmptyMVar)
 #endif
@@ -447,9 +448,12 @@
 #endif
   where
     loop =
-        NS.accept socket `E.catch` \(_ :: IOException) -> do
-            threadDelay 1000000
-            loop
+        NS.accept socket `E.catch` \e ->
+            if isFullErrorType (ioeGetErrorType e)
+                then do
+                    threadDelay 1000000
+                    loop
+                else E.throwIO e
 
 message :: ByteString -> NS.SockAddr -> Message
 message = Message
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/streaming-commons-0.1.12/streaming-commons.cabal 
new/streaming-commons-0.1.12.1/streaming-commons.cabal
--- old/streaming-commons-0.1.12/streaming-commons.cabal        2015-04-14 
06:45:05.000000000 +0200
+++ new/streaming-commons-0.1.12.1/streaming-commons.cabal      2015-05-15 
06:29:28.000000000 +0200
@@ -1,5 +1,5 @@
 name:                streaming-commons
-version:             0.1.12
+version:             0.1.12.1
 synopsis:            Common lower-level functions needed by various streaming 
data libraries
 description:         Provides low-dependency functionality commonly needed by 
various streaming data libraries, such as conduit and pipes.
 homepage:            https://github.com/fpco/streaming-commons


Reply via email to