diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-01-06 09:11:58 +0100 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-01-06 11:43:25 +0100 |
commit | 1be1464a25edf2709faf81a286d5ea9a2f1b922d (patch) | |
tree | 67e25a7f38328f1f514f73eed9acbb71840616e7 /Porting | |
parent | 87dd31c8809837f26b4fbbd9d8b99ccdc65e6deb (diff) | |
download | perl-1be1464a25edf2709faf81a286d5ea9a2f1b922d.tar.gz |
Use git instead of p4 for the --opened option of Porting/Maintainers
Diffstat (limited to 'Porting')
-rw-r--r-- | Porting/Maintainers.pm | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/Porting/Maintainers.pm b/Porting/Maintainers.pm index b271e9fea0..40266f5156 100644 --- a/Porting/Maintainers.pm +++ b/Porting/Maintainers.pm @@ -79,7 +79,7 @@ $0: Usage: $0 [[--maintainer M --module M --files]|[--check] file ...] with a file checks if it has a maintainer with a dir checks all files have a maintainer otherwise checks for multiple maintainers ---opened list all modules of files opened by perforce +--opened list all modules of modified files Matching is case-ignoring regexp, author matching is both by the short id and by the full name and email. A "module" may not be just a module, it may be a file or files or a subdirectory. @@ -106,14 +106,10 @@ sub process_options { ); my @Files; - + if ($Opened) { - @Files = `p4 opened`; + @Files = `git ls-files -m --full-name`; die if $?; - foreach (@Files) { - s!#.*!!s; - s!^//depot/(?:perl|.*?/perl)/!!; - } } else { @Files = @ARGV; } |