Revamp t/92-pod-coverage.t

[perl/modules/rgit.git] / bin / rgit

diff --git a/bin/rgit b/bin/rgit
index 3b908b4fe1f74255f52290b10797e08a7e2f18c4..ef988520d4627d32bbfe4a9fe18f82527ceb937e 100755 (executable)
--- a/bin/rgit
+++ b/bin/rgit
@@ -36,10 +36,10 @@ if (-t && $opts{I}) {
 } elsif ($opts{K}) {
  $policy = 'Keep';
 }
-$policy = eval { App::Rgit::Policy->new(name => $policy) };
+$policy = eval { App::Rgit::Policy->new(policy => $policy) };
 if (not defined $policy) {
  print STDERR $@ if $@;
- $policy = App::Rgit::Policy->new(name => 'Default');
+ $policy = App::Rgit::Policy->new(policy => 'Default');
 }
 
 setpgrp 0, 0 if $Config{d_setpgrp};
@@ -89,6 +89,8 @@ Version 0.06
 =head1 DESCRIPTION
 
 This utility recursively searches in a root directory (which may be the current working directory or - if it has been set - the directory given by the C<GIT_DIR> environment variable) for all git repositories, sort this list by the repository path, C<chdir> into each of them, and executes the specified git command.
+For efficiency reasons, repositories located inside another repository won't be searched for.
+
 Moreover, those formats are substituted in the arguments before running the command :
 
 =over 4
@@ -191,8 +193,6 @@ Add a remote to all repositories in "/foo/bar" to their bare counterpart in C<qu
 
 The core modules L<Carp>, L<Config>, L<Cwd>, L<Exporter>, L<File::Find>, L<File::Spec::Functions> and L<POSIX>.
 
-L<Object::Tiny>.
-
 =head1 AUTHOR
 
 Vincent Pit, C<< <perl at profvince.com> >>, L<http://profvince.com>.