summaryrefslogtreecommitdiff
path: root/Porting/Maintainers.pm
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2009-01-06 09:11:58 +0100
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2009-01-06 11:43:25 +0100
commit1be1464a25edf2709faf81a286d5ea9a2f1b922d (patch)
tree67e25a7f38328f1f514f73eed9acbb71840616e7 /Porting/Maintainers.pm
parent87dd31c8809837f26b4fbbd9d8b99ccdc65e6deb (diff)
downloadperl-1be1464a25edf2709faf81a286d5ea9a2f1b922d.tar.gz
Use git instead of p4 for the --opened option of Porting/Maintainers
Diffstat (limited to 'Porting/Maintainers.pm')
-rw-r--r--Porting/Maintainers.pm10
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;
}