From b5fc5d0a1bc4d959995688c8b363daa859c44036 Mon Sep 17 00:00:00 2001 From: Remi Collet Date: Tue, 21 Jul 2020 07:33:12 +0200 Subject: [PATCH] Fix deprecated syntax --- tests/support/util.tcl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/support/util.tcl b/tests/support/util.tcl index fce3ffd1858..69ea675dca5 100644 --- a/tests/support/util.tcl +++ b/tests/support/util.tcl @@ -119,7 +119,7 @@ proc wait_for_log_message {srv_idx pattern from_line maxtries delay} { set retry $maxtries set stdout [srv $srv_idx stdout] while {$retry} { - set result [exec tail +$from_line < $stdout] + set result [exec tail -n +$from_line < $stdout] set result [split $result "\n"] foreach line $result { if {[string match $pattern $line]} {