diff options
| -rw-r--r-- | URPM/Resolve.pm | 4 | ||||
| -rw-r--r-- | perl-URPM.spec | 5 |
2 files changed, 6 insertions, 3 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. diff --git a/perl-URPM.spec b/perl-URPM.spec index ea63bc1..94271a6 100644 --- a/perl-URPM.spec +++ b/perl-URPM.spec @@ -1,7 +1,7 @@ %define name perl-URPM %define real_name URPM %define version 0.81 -%define release 3mdk +%define release 4mdk %{expand:%%define rpm_version %(rpm -q --queryformat '%{VERSION}-%{RELEASE}' rpm)} @@ -49,6 +49,9 @@ rm -rf $RPM_BUILD_ROOT %changelog +* Fri Dec 20 2002 Pixel <pixel@mandrakesoft.com> 0.81-4mdk +- perl_checker fixes (syntax only) + * Wed Dec 18 2002 Pixel <pixel@mandrakesoft.com> 0.81-3mdk - help perl_checker recognise packages used as classes |