From d47c54ba6d29ee73830621724855fc69ebbfd0f8 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Fri, 8 Jul 2005 12:22:02 +0000
Subject: [PATCH] [project @ 2005-07-08 12:22:02 by simonmar] Fix instance Eq
 Version

---
 Data/Version.hs |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Data/Version.hs b/Data/Version.hs
index c52d21c..d82fc3a 100644
--- a/Data/Version.hs
+++ b/Data/Version.hs
@@ -120,8 +120,8 @@ instance Typeable Version where
 
 instance Eq Version where
   v1 == v2  =  versionBranch v1 == versionBranch v2 
-		&& all (`elem` (versionTags v2)) (versionTags v1)
-		-- tags may be in any order
+                && sort (versionTags v1) == sort (versionTags v2)
+                -- tags may be in any order
 
 instance Ord Version where
   v1 `compare` v2 = versionBranch v1 `compare` versionBranch v2
-- 
1.7.10.4