diff options
Diffstat (limited to 'tests/unit/introspection.tcl')
| -rw-r--r-- | tests/unit/introspection.tcl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/unit/introspection.tcl b/tests/unit/introspection.tcl index 342bb939a..f6477d9c5 100644 --- a/tests/unit/introspection.tcl +++ b/tests/unit/introspection.tcl @@ -6,16 +6,17 @@ start_server {tags {"introspection"}} { test {MONITOR can log executed commands} { set rd [redis_deferring_client] $rd monitor + assert_match {*OK*} [$rd read] r set foo bar r get foo - list [$rd read] [$rd read] [$rd read] - } {*OK*"set" "foo"*"get" "foo"*} + list [$rd read] [$rd read] + } {*"set" "foo"*"get" "foo"*} test {MONITOR can log commands issued by the scripting engine} { set rd [redis_deferring_client] $rd monitor - r eval {redis.call('set',KEYS[1],ARGV[1])} 1 foo bar $rd read ;# Discard the OK + r eval {redis.call('set',KEYS[1],ARGV[1])} 1 foo bar assert_match {*eval*} [$rd read] assert_match {*lua*"set"*"foo"*"bar"*} [$rd read] } |