allowed older version of 'network' dependency

2 files changed, 9 insertions, 1 deletions

diff --git a/Hosts.hs b/Hosts.hs
index e53d441..0761597 100644
--- a/Hosts.hs
+++ b/Hosts.hs
@@ -1,5 +1,9 @@
+{-# LANGUAGE CPP                 #-}
 {-# LANGUAGE ScopedTypeVariables #-}
 {-# LANGUAGE OverloadedStrings   #-}
+#if ! MIN_VERSION_network(2,4,0)
+{-# LANGUAGE StandaloneDeriving  #-}
+#endif
 module Hosts
     ( Hosts
     , assignName
@@ -31,6 +35,10 @@ import Control.Applicative ( (<$>), (<*>) )
 import Control.Monad (mplus)
 import Network.Socket
 
+#if ! MIN_VERSION_network(2,4,0)
+deriving instance Ord SockAddr
+#endif
+
 handleIO_ h a = Exception.catch a (\(_ :: IOException) -> h)
 
 inet_pton :: String -> Maybe SockAddr
diff --git a/kiki.cabal b/kiki.cabal
index 7edf6cd..a5ede74 100644
--- a/kiki.cabal
+++ b/kiki.cabal
@@ -19,7 +19,7 @@ Executable kiki
                      crypto-pubkey-types -any,
                      asn1-types -any, asn1-encoding -any,
                      dataenc -any, text -any, pretty -any, pretty-show -any,
-                     bytestring -any, openpgp (==0.6.1), binary -any,
+                     bytestring -any, openpgp (>=0.6.1), binary -any,
                      unix, time, 
                      containers -any, process -any, filepath -any,
                      network