From e6262b3f6018a00a64163d90a25ebd8a9688eca2 Mon Sep 17 00:00:00 2001
From: des <des@FreeBSD.org>
Date: Wed, 12 Feb 2003 09:51:47 +0000
Subject: Teach whereintheworld to preserve TinderboxNG log messages.

---
 tools/tools/whereintheworld/whereintheworld.pl | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'tools')

diff --git a/tools/tools/whereintheworld/whereintheworld.pl b/tools/tools/whereintheworld/whereintheworld.pl
index 23654df..d64e7e5 100644
--- a/tools/tools/whereintheworld/whereintheworld.pl
+++ b/tools/tools/whereintheworld/whereintheworld.pl
@@ -34,6 +34,10 @@ while ($line = <>) {
 		$lastwasdash = 0;
 		next;
 	}
+	if ($line =~ /^TB /) {
+		print $line;
+		next;
+	}
 	if ($line =~ /^=+>/) {
 		@lines = ();
 	}
@@ -58,7 +62,7 @@ if (!$error) {
 	}
 }
 foreach $line (@lines) {
-	if (!$error && length($line) >= $width) {
+	if (!$error && $line !~ m/^TB / && length($line) >= $width) {
 		substr($line, $width - 7) = " [...]\n";
 	}
 	print $line;
-- 
cgit v1.1