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