From 996d3e196bf6049c35b6dfa955aba54f2f4d44df Mon Sep 17 00:00:00 2001 From: Scott Fleischman Date: Thu, 30 May 2019 10:28:23 -0700 Subject: [PATCH] Use same version check as in cabal file; fix typo in comment. --- Database/MongoDB/Internal/Network.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Database/MongoDB/Internal/Network.hs b/Database/MongoDB/Internal/Network.hs index 9d6f146..84362b7 100644 --- a/Database/MongoDB/Internal/Network.hs +++ b/Database/MongoDB/Internal/Network.hs @@ -4,7 +4,7 @@ module Database.MongoDB.Internal.Network (PortID(..), N.HostName, connectTo) where -#if !MIN_VERSION_network(2, 8, 0) +#if !MIN_VERSION_network(2, 9, 0) import qualified Network as N import System.IO (Handle) @@ -20,11 +20,11 @@ import System.IO (Handle, IOMode(ReadWriteMode)) -- | Wraps network's 'PortNumber' --- Used to easy compatibility between older and newer network versions. +-- Used to ease compatibility between older and newer network versions. newtype PortID = PortNumber N.PortNumber deriving (Show, Eq, Ord) -#if !MIN_VERSION_network(2, 8, 0) +#if !MIN_VERSION_network(2, 9, 0) -- Unwrap our newtype and use network's PortID and connectTo connectTo :: N.HostName -- Hostname