use withscores when performing the dataset digest

diff --git a/test-redis.tcl b/test-redis.tcl
index a306ea6a8c929b878858463785e933bfc86aba0c..a3ced3206b4d102f999377857fbde4e69d6e4353 100644 (file)
--- a/test-redis.tcl
+++ b/test-redis.tcl
@@ -214,7 +214,7 @@ proc datasetDigest r {
                 if {[$r zcard $k] == 0} {
                     set aux {}
                 } else {
-                    set aux [::sha1::sha1 -hex [$r zrange $k 0 -1]]
+                    set aux [::sha1::sha1 -hex [$r zrange $k 0 -1 withscores]]
                 }
             } {hash} {
                 if {[$r hlen $k] == 0} {