From ae0e9fa5ba2035f005086f238e5dbba57108e391 Mon Sep 17 00:00:00 2001 From: Colin Guthrie Date: Mon, 22 Oct 2012 20:07:19 +0000 Subject: minor tidyup (collapse redundant if) --- perl-install/install/steps.pm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'perl-install') diff --git a/perl-install/install/steps.pm b/perl-install/install/steps.pm index f006e5f6d..54f322632 100644 --- a/perl-install/install/steps.pm +++ b/perl-install/install/steps.pm @@ -324,10 +324,8 @@ sub beforeInstallPackages { if ($o->{isUpgrade}) { $o->{modules_conf}->merge_into(modules::any_conf->read); - } - #- save these files in case of upgrade failure. - if ($o->{isUpgrade}) { + #- save these files in case of upgrade failure. foreach (@filesToSaveForUpgrade) { unlink "$::prefix/$_.mdkgisave"; if (-e "$::prefix/$_") { -- cgit v1.2.1