diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-20 11:05:14 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-20 11:05:14 +0000 |
| commit | 98ee250d58af758552ba7ad93aefde0ca171f665 (patch) | |
| tree | 17993b1b95304296dce609a1e22f7c036b6db0e3 /URPM/Resolve.pm | |
| parent | 7d2474be7e1ee6f78fae20b8bf90e71f3336cf17 (diff) | |
| download | perl-URPM-98ee250d58af758552ba7ad93aefde0ca171f665.tar perl-URPM-98ee250d58af758552ba7ad93aefde0ca171f665.tar.gz perl-URPM-98ee250d58af758552ba7ad93aefde0ca171f665.tar.bz2 perl-URPM-98ee250d58af758552ba7ad93aefde0ca171f665.tar.xz perl-URPM-98ee250d58af758552ba7ad93aefde0ca171f665.zip | |
perl_checker fixes (syntax only)
Diffstat (limited to 'URPM/Resolve.pm')
| -rw-r--r-- | URPM/Resolve.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index adb12b9..0e6041b 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -97,7 +97,7 @@ sub resolve_closure_ask_remove { closure => { $from => $why }, }; - my @removes = ($pkg); + my @removes = $pkg; while ($pkg = shift @removes) { #- clean state according to provided properties. foreach ($pkg->provides) { @@ -294,7 +294,7 @@ sub resolve_requested { $state->{selected}{$pkg->id} = delete $requested->{$dep}; $options{no_flag_update} or - $state->{selected}{$pkg->id} ? $pkg->set_flag_requested : $pkg->set_flag_required; + ($state->{selected}{$pkg->id} ? $pkg->set_flag_requested : $pkg->set_flag_required); #- check if package is not already installed before trying to use it, compute #- obsoleted package too. this is valable only for non source package. |