Permalink
Browse files

minor test suite bug fixed

  • Loading branch information...
1 parent a9b18e5 commit 4d7e1255193702937daabf0dbaabbb6876bf5547 @antirez committed Nov 4, 2010
Showing with 2 additions and 2 deletions.
  1. +2 −2 tests/support/util.tcl
View
@@ -200,7 +200,7 @@ proc createComplexDataset {r ops {opt {}}} {
randpath {{*}$r sadd $k $v} \
{{*}$r srem $k $v} \
{
- set otherset [findKeyWithType r set]
+ set otherset [findKeyWithType {*}$r set]
if {$otherset ne {}} {
randpath {
{*}$r sunionstore $k2 $k $otherset
@@ -216,7 +216,7 @@ proc createComplexDataset {r ops {opt {}}} {
randpath {{*}$r zadd $k $d $v} \
{{*}$r zrem $k $v} \
{
- set otherzset [findKeyWithType r zset]
+ set otherzset [findKeyWithType {*}$r zset]
if {$otherzset ne {}} {
randpath {
{*}$r zunionstore $k2 2 $k $otherzset

0 comments on commit 4d7e125

Please sign in to comment.