KEYS now returns a multi bulk reply

This commit is contained in:
antirez
2010-03-01 23:46:24 +01:00
parent 18b6cb7643
commit a3f9eec291
2 changed files with 6 additions and 8 deletions

View File

@ -178,7 +178,7 @@ proc createComplexDataset {r ops} {
}
proc datasetDigest r {
set keys [lsort [split [$r keys *] " "]]
set keys [lsort [$r keys *]]
set digest {}
foreach k $keys {
set t [$r type $k]
@ -204,7 +204,7 @@ proc datasetDigest r {
set aux [::sha1::sha1 -hex [$r zrange $k 0 -1]]
}
} default {
error "Type not supported"
error "Type not supported: $t"
}
}
if {$aux eq {}} continue