mirror of
https://codeberg.org/redict/redict.git
synced 2025-01-23 08:38:27 -05:00
18 lines
580 B
Tcl
18 lines
580 B
Tcl
|
set testmodule [file normalize tests/modules/publish.so]
|
||
|
|
||
|
start_server {tags {"modules"}} {
|
||
|
r module load $testmodule
|
||
|
|
||
|
test {PUBLISH and SPUBLISH via a module} {
|
||
|
set rd1 [redis_deferring_client]
|
||
|
set rd2 [redis_deferring_client]
|
||
|
|
||
|
assert_equal {1} [ssubscribe $rd1 {chan1}]
|
||
|
assert_equal {1} [subscribe $rd2 {chan1}]
|
||
|
assert_equal 1 [r publish.shard chan1 hello]
|
||
|
assert_equal 1 [r publish.classic chan1 world]
|
||
|
assert_equal {message chan1 hello} [$rd1 read]
|
||
|
assert_equal {message chan1 world} [$rd2 read]
|
||
|
}
|
||
|
}
|