packages feed

Network-NineP 0.4.2 → 0.4.3

raw patch · 2 files changed

+15/−6 lines, 2 filesdep ~exceptionsPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: exceptions

API changes (from Hackage documentation)

Files

Network-NineP.cabal view
@@ -1,5 +1,5 @@ Name:                Network-NineP-Version:             0.4.2+Version:             0.4.3 Description:         A library providing one with a somewhat higher level interface to 9P2000 protocol than existing implementations. Designed to facilitate rapid development of synthetic filesystems. Synopsis:            High-level abstraction over 9P protocol Maintainer:          Sergey Alirzaev <zl29ah@gmail.com>@@ -9,7 +9,7 @@ Build-Type:          Simple Cabal-Version:       >= 1.6 Stability:           Experimental-Tested-With:         GHC == 8.0.1+Tested-With:         GHC == 8.2.2  Source-repository head   type:              git@@ -18,7 +18,7 @@ Source-repository this   type:              git   location:          https://github.com/l29ah/Network-NineP.git-  tag:               0.4.2+  tag:               0.4.3  Library   Build-Depends:@@ -35,7 +35,7 @@     transformers >= 0.3.0.0 && < 0.6,     stateref >= 0.3 && < 0.4,     convertible >= 1.0.11.1 && < 1.2,-    exceptions >= 0.8.0.2 && < 0.10,+    exceptions >= 0.8.0.2 && < 0.11,     monad-peel >= 0.1.1 && < 0.3,     hslogger >= 1.2.9 && < 1.3   Exposed-modules:@@ -53,4 +53,13 @@  Executable test   Main-is: Test.hs+  Other-modules:+    Control.Monad.EmbedIO+    Network.NineP+    Network.NineP.Error+    Network.NineP.File+    Network.NineP.Internal.File+    Network.NineP.Internal.Msg+    Network.NineP.Internal.State+    Network.NineP.Server   ghc-options: -fno-warn-tabs
Network/NineP/Server.hs view
@@ -59,10 +59,10 @@ listen' :: HostName -> PortNumber -> IO Socket listen' hostname port = do 	proto <- getProtocolNumber "tcp"-	bracketOnError (socket AF_INET Stream proto) Network.Socket.sClose (\sock -> do+	bracketOnError (socket AF_INET Stream proto) close (\sock -> do 		setSocketOption sock ReuseAddr 1 		he <- getHostByName hostname-		bindSocket sock (SockAddrInet port (hostAddress he))+		bind sock (SockAddrInet port (hostAddress he)) 		listen sock maxListenQueue 		return sock)