diff options
| author | Francois Pons <fpons@mandriva.com> | 2003-02-17 16:37:46 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2003-02-17 16:37:46 +0000 |
| commit | f01a2650aeaed517e5d9509032abf63c3e138d49 (patch) | |
| tree | 112152b986007498c5f841805fc627faf330032e /perl-install | |
| parent | 449f2abfe1c7931220d79beb4df4b91fcc113637 (diff) | |
| download | drakx-f01a2650aeaed517e5d9509032abf63c3e138d49.tar drakx-f01a2650aeaed517e5d9509032abf63c3e138d49.tar.gz drakx-f01a2650aeaed517e5d9509032abf63c3e138d49.tar.bz2 drakx-f01a2650aeaed517e5d9509032abf63c3e138d49.tar.xz drakx-f01a2650aeaed517e5d9509032abf63c3e138d49.zip | |
add a reboot if not enough free space is available for installation or upgrade.
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 5254b74ae..d4371b51d 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -382,7 +382,11 @@ sub choosePackages { require pkgs; my $min_size = pkgs::selectedSize($packages); - $min_size < $availableC or die N("Your system does not have enough space left for installation or upgrade (%d > %d)", $min_size, $availableC); + unless ($min_size < $availableC) { + $o->ask_warn('', N("Your system does not have enough space left for installation or upgrade (%d > %d)", + $min_size, $availableC)); + install_steps::rebootNeeded($o); + } my $min_mark = 4; |