fix for the just added new test

diff --git a/test-redis.tcl b/test-redis.tcl
index 2d4b9dcbccf021810b0982abab63c7a3abd5892a..cb2f9684e649e4240b9fee427172aaaf0e47ae1b 100644 (file)
--- a/test-redis.tcl
+++ b/test-redis.tcl
@@ -293,7 +293,7 @@ proc main {server port} {
             set index [randomInt 100]
             set buf [$r get bigpayload_$index]
             if {$buf != $payload($index)} {
-                set err "Values differ: I set '$buf' but I read back '$buf2'"
+                set err "Values differ: I set '$payload($index)' but I read back '$buf'"
                 break
             }
         }