Remove $date from Porting/checkAUTHORS.pl, which was never used.
authorNicholas Clark <nick@ccl4.org>
Thu, 27 Oct 2011 11:17:08 +0000 (13:17 +0200)
committerNicholas Clark <nick@ccl4.org>
Mon, 31 Oct 2011 10:38:26 +0000 (11:38 +0100)
It was added in commit 00229b9760c33911, along with the pattern which
captured the value of 'AuthorDate:', when checkAUTHORS.pl was converted to
parsing the output of git log instead of p4 log. Neither the old nor the new
code made any use of dates, hence the variable (and the capture) were never
needed.

Porting/checkAUTHORS.pl

index ffc3c28..b887508 100755 (executable)
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 use strict;
-my ($committer, $patch, $author, $date);
+my ($committer, $patch, $author);
 use utf8;
 use Getopt::Long;
 use Text::Wrap;
@@ -94,10 +94,10 @@ sub parse_commits_from_stdin {
     for (@lines) {
         next if m/^$/;
         next if m/^(\S*?)^Merge:/ism;    # skip merge commits
-        if (m/^(.*?)^Author:\s*(.*?)^AuthorDate:\s*(.*?)^Commit:\s*(.*?)^(.*)$/gism) {
+        if (m/^(.*?)^Author:\s*(.*?)^AuthorDate:\s*.*?^Commit:\s*(.*?)^(.*)$/gism) {
 
             # new patch
-            ( $patch, $author, $date, $committer ) = ( $1, $2, $3, $4 );
+            ( $patch, $author, $committer ) = ( $1, $2, $3 );
             chomp($author);
             unless ($author) { die $_ }
             chomp($committer);