From 24001cf2eef477fe59dc4c81ef990306a39f38ff Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Wed, 6 Mar 2002 15:31:01 +0000 Subject: fixed when hdlist gives no new package (new name) but only obsoleted package or updated package, ie security updates may appreciate. --- perl-install/pkgs.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index bd2ad52b4..f91365ddc 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -488,7 +488,7 @@ sub psUsingHdlist { #- update maximal index. $m->{max} = $packages->{count} - 1; - $m->{max} >= $m->{min} or die "nothing found while parsing $newf"; + $m->{max} >= $m->{min} || $relocated > 0 || $ignored > 0 or die "nothing found while parsing $newf"; $relocated > 0 and log::l("relocated $relocated headers in $hdlist"); $ignored > 0 and log::l("ignored $ignored headers in $hdlist"); log::l("read " . ($m->{max} - $m->{min} + 1) . " new headers in $hdlist"); -- cgit v1.2.1