diff options
| -rw-r--r-- | urpm/main_loop.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/urpm/main_loop.pm b/urpm/main_loop.pm index 5489bebc..95fc744a 100644 --- a/urpm/main_loop.pm +++ b/urpm/main_loop.pm @@ -29,7 +29,7 @@ use urpm::select; use urpm::orphans; use urpm::get_pkgs; use urpm::signature; -use urpm::util qw(untaint difference2 intersection member partition); +use urpm::util qw(untaint difference2 find intersection member partition); # locking is left to callers sub run { @@ -285,7 +285,7 @@ sub run { if (@l) { my ($raw_error, $translated) = partition { /^(badarch|bados|installed|badrelocate|conflicts|installed|diskspace|disknodes|requires|conflicts|unknown)\@/ } @l; @l = @$translated; - my $fatal = grep { /^disk/ } @$raw_error; + my $fatal = find { /^disk/ } @$raw_error; my $no_question = $fatal || $urpm->{options}{auto}; #- Warning : the following message is parsed in urpm::parallel_* |