Make get_maintainer.pl scan the modifying lines of a patch for a list of keywords and add an associated email if found. The first user is the devicetree-discuss mailing list which should always be cc'ed if a device tree property is inserted/removed (keyword 'of_get_property'). This patch is the result from commit 1965d30356c1c65660ba3330927671cfe81acdd5 entering mainline which seems to have been missed by all parties interested in the device tree (and at least had the documentation missing). As adding properties can happen anywhere and so there is no fitting fileglob, this keyword based approach is proposed.
Signed-off-by: Wolfram Sang <w.s...@pengutronix.de> Cc: Joe Perches <j...@perches.com> Cc: Grant Likely <grant.lik...@secretlab.ca> Cc: Anton Vorontsov <avoront...@ru.mvista.com> --- scripts/get_maintainer.pl | 24 ++++++++++++++++-------- 1 files changed, 16 insertions(+), 8 deletions(-) diff --git a/scripts/get_maintainer.pl b/scripts/get_maintainer.pl index cdb44b6..e1150ea 100755 --- a/scripts/get_maintainer.pl +++ b/scripts/get_maintainer.pl @@ -44,6 +44,11 @@ my $help = 0; my $exit = 0; +my %keywords_to_mail = ( + 'of_get_property' => 'L: devicetree-disc...@lists.ozlabs.org', +); +my $keywords_to_mail_match = join('|', keys %keywords_to_mail); + my @penguin_chief = (); push(@penguin_chief,"Linus Torvalds:torval...@linux-foundation.org"); #Andrew wants in on most everything - 2009/01/14 @@ -188,6 +193,12 @@ if ($email_remove_duplicates) { my @files = (); my @range = (); +my @email_to = (); +my @list_to = (); +my @scm = (); +my @web = (); +my @subsystem = (); +my @status = (); foreach my $file (@ARGV) { ##if $file is a directory and it lacks a trailing slash, add one @@ -213,7 +224,11 @@ foreach my $file (@ARGV) { if ($email_git_blame) { push(@range, "$lastfile:$1:$2"); } - } + # Check the lines which a patch modifies for keywords; add mail if found. + } elsif (m/^[+-].*($keywords_to_mail_match)/o) { + (my $keyword_mail = $keywords_to_mail{$1}) =~ s/^([LM]): //; + push( @{ ($1 eq 'L') ? \...@list_to : \...@email_to }, $keyword_mail ); + } } close(PATCH); if ($file_cnt == @files) { @@ -224,13 +239,6 @@ foreach my $file (@ARGV) { } } -my @email_to = (); -my @list_to = (); -my @scm = (); -my @web = (); -my @subsystem = (); -my @status = (); - # Find responsible parties foreach my $file (@files) { -- 1.6.3.3 _______________________________________________ Linuxppc-dev mailing list Linuxppc-dev@lists.ozlabs.org https://lists.ozlabs.org/listinfo/linuxppc-dev