diff --git a/haskell-neo4j-client.cabal b/haskell-neo4j-client.cabal
--- a/haskell-neo4j-client.cabal
+++ b/haskell-neo4j-client.cabal
@@ -1,5 +1,5 @@
 name:                haskell-neo4j-client
-version:             0.3.1.2
+version:             0.3.1.3
 synopsis:            A Haskell neo4j client
 description:         
     Library to interact with Neo4j databases. 
@@ -41,7 +41,7 @@
                    , bytestring                  == 0.10.*
                    , test-framework              == 0.8.*
                    , test-framework-quickcheck2  == 0.3.*
-                   , QuickCheck                  == 2.7.*
+                   , QuickCheck                  >= 2.7.0
                    , test-framework-hunit        == 0.3.*
                    , test-framework-th           == 0.2.*
                    , HUnit                       == 1.2.*
diff --git a/tests/IntegrationTests.hs b/tests/IntegrationTests.hs
--- a/tests/IntegrationTests.hs
+++ b/tests/IntegrationTests.hs
@@ -1692,9 +1692,15 @@
     let checkPath = \p nodes rels -> do
         neo4jEqual (L.sort $ map _getNode nodes) (L.sort $ T.pathNodes p)
         neo4jEqual (L.sort $ map _getRel rels) (L.sort $ T.pathRels p)
+    let checkPath' = \p nodes rels -> (L.sort $ map _getNode nodes) == (L.sort $ T.pathNodes p) &&
+                                      (L.sort $ map _getRel rels) == (L.sort $ T.pathRels p)
     checkPath (ps !! 0) ["Root"] []
-    checkPath (ps !! 1) ["Root", "Johan"] ["Root-Johan"]
-    checkPath (ps !! 2) ["Root", "Mattias"] ["Root-Mattias"]
+    if checkPath' (ps !! 1) ["Root", "Johan"] ["Root-Johan"]
+       then checkPath (ps !! 1) ["Root", "Johan"] ["Root-Johan"]
+       else checkPath (ps !! 1) ["Root", "Mattias"] ["Root-Mattias"]
+    if checkPath' (ps !! 2) ["Root", "Johan"] ["Root-Johan"]
+       then checkPath (ps !! 2) ["Root", "Johan"] ["Root-Johan"]
+       else checkPath (ps !! 2) ["Root", "Mattias"] ["Root-Mattias"]
     cleanUpTraversalTest g
 
 -- | Test a traversal with an unexisting start