summaryrefslogtreecommitdiffstats
path: root/perl-install/install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-05-23 18:26:50 +0000
committerThierry Vignaud <tv@mageia.org>2012-05-23 18:26:50 +0000
commite6baeceb3c71aa6015a40a684cfd37e49cf1c5b6 (patch)
treec070281e6d1f921face81340c7ca4791708d9075 /perl-install/install
parent0e8c8254db9eb7334b190afe23d64ea3c3844f11 (diff)
downloaddrakx-e6baeceb3c71aa6015a40a684cfd37e49cf1c5b6.tar
drakx-e6baeceb3c71aa6015a40a684cfd37e49cf1c5b6.tar.gz
drakx-e6baeceb3c71aa6015a40a684cfd37e49cf1c5b6.tar.bz2
drakx-e6baeceb3c71aa6015a40a684cfd37e49cf1c5b6.tar.xz
drakx-e6baeceb3c71aa6015a40a684cfd37e49cf1c5b6.zip
(finish_install) split it out of main()
Diffstat (limited to 'perl-install/install')
-rw-r--r--perl-install/install/install2.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/install/install2.pm b/perl-install/install/install2.pm
index d8594b8db..c716b2e8a 100644
--- a/perl-install/install/install2.pm
+++ b/perl-install/install/install2.pm
@@ -665,6 +665,10 @@ sub main {
last if $o->{step} eq 'exitInstall';
}
+ finish_install();
+}
+
+sub finish_install() {
unlink $install::any::compressed_image_on_disk;
install::media::clean_postinstall_rpms();
install::media::log_sizes();