diff options
Diffstat (limited to 'tests/helpers/gen_write_load.tcl')
| -rw-r--r-- | tests/helpers/gen_write_load.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/helpers/gen_write_load.tcl b/tests/helpers/gen_write_load.tcl index cbf6651bd..568f5cde2 100644 --- a/tests/helpers/gen_write_load.tcl +++ b/tests/helpers/gen_write_load.tcl @@ -5,6 +5,7 @@ set ::tlsdir "tests/tls" proc gen_write_load {host port seconds tls} { set start_time [clock seconds] set r [redis $host $port 1 $tls] + $r client setname LOAD_HANDLER $r select 9 while 1 { $r set [expr rand()] [expr rand()] |