Messages in this thread Patch in this message | | | Subject | [PATCH] get_maintainer.pl: Look for .get_maintainer.conf in lk, then $HOME then scripts | From | Joe Perches <> | Date | Sun, 12 Sep 2010 22:21:39 -0700 |
| |
On Mon, 2010-09-13 at 00:01 -0400, Valdis.Kletnieks@vt.edu wrote: > Any chance of getting that to be ~/.get_maintainer.conf rather than > ./.get_maintainer.conf? I've just gotten bit like the 3rd or 4th time by "oh but > you didn't create that file in *this* tree" (I usually have a linus git tree, a linux-next > tree, and 3-4 -mm trees lying around).
Sure.
Signed-off-by: Joe Perches <joe@perches.com> --- diff --git a/scripts/get_maintainer.pl b/scripts/get_maintainer.pl index b228198..ea54561 100755 --- a/scripts/get_maintainer.pl +++ b/scripts/get_maintainer.pl @@ -107,10 +107,12 @@ my %VCS_cmds_hg = ( "blame_commit_pattern" => "^([0-9a-f]+):" ); -if (-f "${lk_path}.get_maintainer.conf") { +my $conf = which_conf(".get_maintainer.conf"); +if (-f $conf) { my @conf_args; - open(my $conffile, '<', "${lk_path}.get_maintainer.conf") - or warn "$P: Can't open .get_maintainer.conf: $!\n"; + open(my $conffile, '<', "$conf") + or warn "$P: Can't find a readable .get_maintainer.conf file $!\n"; + while (<$conffile>) { my $line = $_; @@ -952,6 +954,18 @@ sub which { return ""; } +sub which_conf { + my ($conf) = @_; + + foreach my $path (split(/:/, ".:$ENV{HOME}:.scripts")) { + if (-e "$path/$conf") { + return "$path/$conf"; + } + } + + return ""; +} + sub mailmap { my (@lines) = @_; my %hash;
| |