]> git.netwichtig.de Git - user/henk/code/inspircd.git/blobdiff - tools/mkheaders
Fail a SANICK if the target nickname already exists.
[user/henk/code/inspircd.git] / tools / mkheaders
index ee8142d3b07e912d2f190995a7854ee0d5affde9..0569ec4226682df54fc120bfea72e50e12e073f9 100755 (executable)
@@ -43,6 +43,7 @@ use make::console;
 my @ignored_revisions = (
        '0b4285abd12323920d92fee51e199edd7527dbec', # adding copyright headers
        '46a39046196f55b52336e19662bb7bac85b731ac', # adding copyright headers
+       '4a6fedd9324d87349a806c9c1d0ae6e7d3c1fd38', # mass-updating descriptions
        '56375392ba94f2552bbeeeab4fd39e1e50295525', # sadie's name change
        'bab14f0dd2345c9d7dcbc47c918563709e1ac094', # peavey breaking line endings
        'f2acdbc3820f0f4f5ef76a0a64e73d2a320df91f', # peavey fixing line endings
@@ -91,12 +92,12 @@ for my $path (@paths) {
                                next unless scalar keys %author > 1;
                                my $display = sprintf "%s <%s>", $author{NAME}, $author{EMAIL};
                                $authors{$display} //= [];
-                               push $authors{$display}, $author{YEAR};
+                               push @{$authors{$display}}, $author{YEAR};
                                for my $commit (uniq @{$author{COMMITS}}) {
                                        my $details = `git rev-list --format=%B --max-count=1 $commit`;
                                        while ($details =~ /co-authored-by: ([^<]+<[^>]+>)/gi) {
                                                $authors{$1} //= [];
-                                               push $authors{$1}, $author{YEAR};
+                                               push @{$authors{$1}}, $author{YEAR};
                                        }
                                }
                                undef %author;
@@ -114,7 +115,7 @@ for my $path (@paths) {
                                        $last_year = $year;
                                } else {
                                        if ($last_year == $start_year) {
-                                               push @year_ranges, $last_year; 
+                                               push @year_ranges, $last_year;
                                        } else {
                                                push @year_ranges, "$start_year-$last_year";
                                        }
@@ -123,7 +124,7 @@ for my $path (@paths) {
                        }
                        if (defined $last_year) {
                                if ($last_year == $start_year) {
-                                       push @year_ranges, $last_year; 
+                                       push @year_ranges, $last_year;
                                } else {
                                        push @year_ranges, "$start_year-$last_year";
                                }