1 files changed, 1 insertions, 1 deletions
diff --git a/Connection.hs b/Connection.hs
index a3004c11..7228a0e4 100644
--- a/Connection.hs
+++ b/Connection.hs
@@ -13,7 +13,7 @@ data Status status
    = Dormant
    | InProgress status
    | Established
- deriving Functor
+ deriving (Eq,Ord,Functor)
 data Policy
    = RefusingToConnect

diff --git a/Connection.hs b/Connection.hs index a3004c11..7228a0e4 100644 --- a/Connection.hs +++ b/Connection.hs
@@ -13,7 +13,7 @@ data Status status
13	= Dormant	13	= Dormant
14	\| InProgress status	14	\| InProgress status
15	\| Established	15	\| Established
16	deriving Functor	16	deriving (Eq,Ord,Functor)
17		17
18	data Policy	18	data Policy
19	= RefusingToConnect	19	= RefusingToConnect