1 files changed, 8 insertions, 0 deletions
diff --git a/Utility/URI.hs b/Utility/URI.hs
index 1e2129a47..e68fda58d 100644
--- a/Utility/URI.hs
+++ b/Utility/URI.hs
@@ -8,3 +8,11 @@
 {-# LANGUAGE CPP #-}
 
 module Utility.URI where
+
+-- Old versions of network lacked an Ord for URI
+#if ! MIN_VERSION_network(2,4,0)
+import Network.URI
+
+instance Ord URI where
+	a `compare` b = show a `compare` show b
+#endif