File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed
Database/MongoDB/Internal Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change 4
4
module Database.MongoDB.Internal.Network (PortID (.. ), N. HostName , connectTo ) where
5
5
6
6
7
- #if !MIN_VERSION_network(2, 8 , 0)
7
+ #if !MIN_VERSION_network(2, 9 , 0)
8
8
9
9
import qualified Network as N
10
10
import System.IO (Handle )
@@ -20,11 +20,11 @@ import System.IO (Handle, IOMode(ReadWriteMode))
20
20
21
21
22
22
-- | Wraps network's 'PortNumber'
23
- -- Used to easy compatibility between older and newer network versions.
23
+ -- Used to ease compatibility between older and newer network versions.
24
24
newtype PortID = PortNumber N. PortNumber deriving (Show , Eq , Ord )
25
25
26
26
27
- #if !MIN_VERSION_network(2, 8 , 0)
27
+ #if !MIN_VERSION_network(2, 9 , 0)
28
28
29
29
-- Unwrap our newtype and use network's PortID and connectTo
30
30
connectTo :: N. HostName -- Hostname
You can’t perform that action at this time.
0 commit comments