diff options
| -rw-r--r-- | t/01compile.t | 1 | ||||
| -rw-r--r-- | urpm/parallel_ka_run.pm | 2 | ||||
| -rw-r--r-- | urpm/parallel_ssh.pm | 2 |
3 files changed, 4 insertions, 1 deletions
diff --git a/t/01compile.t b/t/01compile.t index d77c1a7e..753c5ff6 100644 --- a/t/01compile.t +++ b/t/01compile.t @@ -2,7 +2,6 @@ use strict; use warnings; -no warnings 'redefine'; use Test::More tests => 10; for my $module (glob("urpm/*.pm")) { diff --git a/urpm/parallel_ka_run.pm b/urpm/parallel_ka_run.pm index 4100ee96..cb4f2d6c 100644 --- a/urpm/parallel_ka_run.pm +++ b/urpm/parallel_ka_run.pm @@ -250,6 +250,8 @@ sub parallel_install { package urpm; +no warnings 'redefine'; + sub handle_parallel_options { my (undef, $options) = @_; my ($media, $ka_run_options) = $options =~ /ka-run(?:\(([^\)]*)\))?:(.*)/; diff --git a/urpm/parallel_ssh.pm b/urpm/parallel_ssh.pm index 04b56fbc..1ed4406a 100644 --- a/urpm/parallel_ssh.pm +++ b/urpm/parallel_ssh.pm @@ -287,6 +287,8 @@ sub parallel_install { package urpm; +no warnings 'redefine'; + sub handle_parallel_options { my (undef, $options) = @_; my ($id, @nodes) = split /:/, $options; |