diff options
Diffstat (limited to 'tests/unit/pause.tcl')
-rw-r--r-- | tests/unit/pause.tcl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/unit/pause.tcl b/tests/unit/pause.tcl index 99fc7214d..f7ade2a10 100644 --- a/tests/unit/pause.tcl +++ b/tests/unit/pause.tcl @@ -86,6 +86,14 @@ start_server {tags {"pause network"}} { $rd close } + test "Test may-replicate commands are rejected in ro script by pause RO" { + r client PAUSE 60000 WRITE + assert_error {ERR May-replicate commands are not allowed when client pause write*} { + r EVAL_RO "return redis.call('publish','ch','msg')" 0 + } + r client unpause + } + test "Test multiple clients can be queued up and unblocked" { r client PAUSE 60000 WRITE set clients [list [redis_deferring_client] [redis_deferring_client] [redis_deferring_client]] |