oh foo, I didn't mean to include this in the prev commit

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