From 26affc6c61604c9872ec2aaa162d647ce96277c4 Mon Sep 17 00:00:00 2001
From: Abe Timmerman <abe@ztreet.demon.nl>
Date: Sun, 13 Jun 2004 13:41:49 +0200
Subject: [PATCH] t/TEST Message-Id: <200406131141.50361.abe@ztreet.demon.nl>

p4raw-id: //depot/perl@22932
---
 t/TEST | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/t/TEST b/t/TEST
index 7b9afa6..357f230 100755
--- a/t/TEST
+++ b/t/TEST
@@ -448,8 +448,12 @@ EOT
 	}
 	else {
 	    $next += 1;
-	    print "${te}FAILED at test $next";
-	    print ($next > $max) ? "\tpossibly due to extra output\n" : "\n";
+	    if ($next > $max) {
+	        print "${te}FAILED at test $next\tpossibly due to extra output\n";
+	    }
+	    else {
+		print "${te}FAILED at test $next\n";
+	    }
 	    $bad = $bad + 1;
 	    $_ = $test;
 	    if (/^base/) {
-- 
2.7.4