From 9d6b0d7dd6d2b80f52e4db1af5e2e8d713393d3a Mon Sep 17 00:00:00 2001
From: Wilson Snyder <wsnyder@wsnyder.org>
Date: Mon, 30 Sep 2019 18:56:04 -0400
Subject: [PATCH] Tests: Fix broken contributors check.

---
 test_regress/t/t_dist_contributors.pl | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/test_regress/t/t_dist_contributors.pl b/test_regress/t/t_dist_contributors.pl
index 80f87cdf8..e2aa1fa49 100755
--- a/test_regress/t/t_dist_contributors.pl
+++ b/test_regress/t/t_dist_contributors.pl
@@ -33,11 +33,8 @@ sub check {
     read_authors();
     for my $author (sort keys %Authors) {
         print "Check: $author\n" if $Self->{verbose};
-        if ($author =~ /(<[^>]+>)/) {
-            my $email = $1;
-            if (!$Contributors{$email}) {
-                error("Certify your contribution by appending '$author' to CONTRIBUTORS");
-            }
+        if (!$Contributors{$author}) {
+            error("Certify your contribution by appending '$author' to CONTRIBUTORS");
         }
     }
 }
@@ -48,7 +45,7 @@ sub read_contributors {
         or error("$! $filename");
     # Assumes git .mailmap format
     while (my $line = ($fh && $fh->getline)) {
-        while ($line =~ /(<[^>]+>)/g) {
+        while ($line =~ /(.*)/g) {
             $line =~ s/ *<[^>]+>//;
             $Contributors{$1} = 1;
         }