Don't store the repos in the command, so that no search happen for Once commands

[perl/modules/rgit.git] / lib / App / Rgit / Command / Each.pm

diff --git a/lib/App/Rgit/Command/Each.pm b/lib/App/Rgit/Command/Each.pm
index 155e9744ac37ffa1417b22537f3e294072c1f44c..2825ef67eed03bb6956cde4d6bd9e71f76adebc4 100644 (file)
--- a/lib/App/Rgit/Command/Each.pm
+++ b/lib/App/Rgit/Command/Each.pm
@@ -35,10 +35,11 @@ It implements :
 
 sub run {
  my $self = shift;
+ my $conf = shift;
  my $status = 0;
- for (@{$self->repos}) {
+ for (@{$conf->repos}) {
   $_->chdir or next;
-  $status = $_->run($_[0], @{$self->args});
+  $status = $_->run($conf, @{$self->args});
   last if $status;
  }
  $self->cwd_as_repo->chdir;