From 23b75ec646306127dd7a9695507010c872c63a57 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 7 Sep 2007 08:51:46 +0000 Subject: small fix: there may be no medium name for a package (from command line) --- urpmi | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/urpmi b/urpmi index af749e8c..03e96541 100755 --- a/urpmi +++ b/urpmi @@ -585,7 +585,8 @@ foreach my $pkg (sort { $a->name cmp $b->name } @{$urpm->{depslist}}[keys %{$sta if (!$env && $install_src && $pkg->arch ne 'src') { push @root_only, $pkg->fullname; } elsif ($install_src || $pkg->arch ne 'src') { - my @name_and_evr = ($pkg->fullname, URPM::pkg2media($urpm->{media}, $pkg)->{name}); + my $medium = URPM::pkg2media($urpm->{media}, $pkg); + my @name_and_evr = ($pkg->fullname, $medium && $medium->{name}); $name_and_evr[2] =~ s/mdv(.*)/mdv/ if length($name_and_evr[2]) > 15; if ($state->{selected}{$pkg->id}{suggested}) { push @name_and_evr, N("(suggested)"); -- cgit v1.2.1