aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xtests/runtests.pl15
1 files changed, 11 insertions, 4 deletions
diff --git a/tests/runtests.pl b/tests/runtests.pl
index 2a39715f6..2660a4ac3 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -3683,10 +3683,17 @@ sub displaylogcontent {
$truncate = $linecount > 1000;
}
}
- if (@tail) {
- logmsg "=== File too long: lines here were removed\n";
- # This won't work properly if time stamps are enabled in logmsg
- logmsg join('',@tail[$#tail-200..$#tail]);
+ if(@tail) {
+ my $tailshow = 200;
+ my $tailskip = 0;
+ my $tailtotal = scalar @tail;
+ if($tailtotal > $tailshow) {
+ $tailskip = $tailtotal - $tailshow;
+ logmsg "=== File too long: $tailskip lines omitted here\n";
+ }
+ for($tailskip .. $tailtotal-1) {
+ logmsg "$tail[$_]";
+ }
}
close(SINGLE);
}