make a scripting test more valgrind friendly

diff --git a/tests/unit/scripting.tcl b/tests/unit/scripting.tcl
index 1735b264e997763d3cb7567bbc83f29dc192ba9b..15ea0d5ae9830912bd9458651df181dbb8f884ae 100644 (file)
--- a/tests/unit/scripting.tcl
+++ b/tests/unit/scripting.tcl
@@ -141,7 +141,7 @@ start_server {tags {"scripting repl"}} {
             r evalsha ae3477e27be955de7e1bc9adfdca626b478d3cb2 0
         } {2}
 
             r evalsha ae3477e27be955de7e1bc9adfdca626b478d3cb2 0
         } {2}
 

-        after 100
+        if {$::valgrind} {after 2000} else {after 100}

 
         test {If EVALSHA was replicated as EVAL the slave should be ok} {
             r -1 get x
 
         test {If EVALSHA was replicated as EVAL the slave should be ok} {
             r -1 get x