From 128e89dde29a15d39c5e266650c419e64d5b17ee Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Wed, 12 May 2010 17:22:39 +0200
Subject: [PATCH] use withscores when performing the dataset digest

---
 test-redis.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test-redis.tcl b/test-redis.tcl
index a306ea6a8..a3ced3206 100644
--- 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} {