summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/install/NEWS2
-rw-r--r--perl-install/install/any.pm4
2 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index c9b5e54c7..b3abe8a5e 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,5 @@
+- fix crash
+
Version 11.88 - 16 February 2009
- don't crash on invalid partition table
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index 6ad227e20..23bd12df3 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -372,9 +372,9 @@ sub setPackages {
sub remove_package_for_upgrade {
my ($o) = @_;
- my $extension;
+ my $extension = $o->{upgrade_by_removing_pkgs_matching};
- return if !$extension = $o->{upgrade_by_removing_pkgs_matching};
+ return if !$extension;
my $time = time();
my ($_w, $wait_message) = $o->wait_message_with_progress_bar;