diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2007-11-09 09:42:15 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2007-11-09 09:42:15 +0000 |
| commit | e4865848efe9f1a8fef5df15924e431d63aca92d (patch) | |
| tree | 23e1592d26726d96bb1214a68bd6b92cca106b54 | |
| parent | 3b303a3dd45e646cfee045c48b1b75efe0565c63 (diff) | |
| download | perl-URPM-e4865848efe9f1a8fef5df15924e431d63aca92d.tar perl-URPM-e4865848efe9f1a8fef5df15924e431d63aca92d.tar.gz perl-URPM-e4865848efe9f1a8fef5df15924e431d63aca92d.tar.bz2 perl-URPM-e4865848efe9f1a8fef5df15924e431d63aca92d.tar.xz perl-URPM-e4865848efe9f1a8fef5df15924e431d63aca92d.zip | |
workaround buggy apps modifying $_ (#22144)
| -rw-r--r-- | URPM.pm | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -101,8 +101,8 @@ sub traverse { my ($urpm, $callback) = @_; if ($callback) { - foreach (@{$urpm->{depslist} || []}) { - $callback->($_); + foreach my $p (@{$urpm->{depslist} || []}) { + $callback->($p); } } |