From e82688c8b8f639705356d25c180ffe754c2b2c34 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 1 Jul 1999 18:50:20 +0000
Subject: *** empty log message ***

---
 perl-install/pkgs.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'perl-install/pkgs.pm')

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 79a7ae6ca..6031735e1 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -169,8 +169,7 @@ sub install {
 
     foreach my $p (@$toInstall) {
 	my $fullname = sprintf "%s-%s-%s.%s.rpm", 
-	                       $p->{name},
-	                       map { c::headerGetEntry($p->{header}, $_) } qw(version release arch);
+	                       map { c::headerGetEntry($p->{header}, $_) } qw(name version release arch);
 	c::rpmtransAddPackage($trans, $p->{header}, $method->getFile($fullname) , $isUpgrade);
 	$nb++;
 	$total += $p->{size};
-- 
cgit v1.2.1