X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fcheck-www-inbox.perl;h=08e62471fedbda310b953b980ad2fee1817588d1;hb=87425172fb480214c3f72e0174f4f8f15f48d92d;hp=6be631e9dc5c0e89ffff5a1530a72cbcddbdb40d;hpb=115f78accd1cd79ea716db1d4e29ddc0633a9d45;p=public-inbox.git

diff --git a/t/check-www-inbox.perl b/t/check-www-inbox.perl
index 6be631e9..08e62471 100644
--- a/t/check-www-inbox.perl
+++ b/t/check-www-inbox.perl
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -w
-# Copyright (C) 2016 all contributors <meta@public-inbox.org>
+# Copyright (C) 2016-2018 all contributors <meta@public-inbox.org>
 # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
 # Parallel WWW checker
 my $usage = "$0 [-j JOBS] [-s SLOW_THRESHOLD] URL_OF_INBOX\n";
@@ -131,10 +131,6 @@ sub worker_loop {
 			warn "W: ".$r->code . " $u\n"
 		}
 
-		# check bad links
-		my @at = grep(/@/, @links);
-		print "BAD: $u ", join("\n", @at), "\n" if @at;
-
 		my $s;
 		# blocking
 		foreach my $l (@links, "DONE\t$u") {