This commit is contained in:
Valentino Geron 2023-05-25 13:53:34 +03:00
parent ff492a974c
commit 2e8eb294ab

View file

@ -34,7 +34,7 @@ set ::redis_cluster::plain_commands {
hgetall hexists hscan incrby decrby incrbyfloat getset move
expire expireat pexpire pexpireat type ttl pttl persist restore
dump bitcount bitpos pfadd pfcount cluster ssubscribe spublish
sunsubscribe pubsub
sunsubscribe
}
# Create a cluster client. The nodes are given as a list of host:port. The TLS
@ -269,6 +269,11 @@ proc ::redis_cluster::get_keys_from_command {cmd argv} {
eval {return [lrange $argv 2 1+[lindex $argv 1]]}
evalsha {return [lrange $argv 2 1+[lindex $argv 1]]}
spublish {return [list [lindex $argv 1]]}
pubsub {
if {[lindex $argv 0] eq "shardnumsub"} {
return [list [lindex $argv 1]]
}
}
}
# All the remaining commands are not handled.