diff options
-rw-r--r-- | NEWS | 2 | ||||
-rw-r--r-- | URPM/Resolve.pm | 10 |
2 files changed, 7 insertions, 5 deletions
@@ -1,3 +1,5 @@ +- fix bug doing "urpmi kernel-source" + Version 2.02 - 18 September 2007, by Pascal "Pixel" Rigaux - prefer every kernel-<flavor>-devel-<version> packages for which diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index 29c6b5a..c3ca974 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -9,6 +9,11 @@ use Config; sub min { my $n = shift; $_ < $n and $n = $_ foreach @_; $n } sub uniq { my %l; $l{$_} = 1 foreach @_; grep { delete $l{$_} } @_ } +sub find(&@) { + my $f = shift; + $f->($_) and return $_ foreach @_; + undef; +} sub property2name { $_[0] =~ /^([^\s\[]*)/ && $1; @@ -297,11 +302,6 @@ sub _choose_required { $pkg; } -sub find(&@) { - my $f = shift; - $f->($_) and return $_ foreach @_; - undef; -} sub pkg2media { my ($mediums, $p) = @_; my $id = $p->id; |