diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-05-12 04:28:41 -0400 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-05-18 04:45:07 +0200 |
| commit | 41e7676d8b316a5a7425cd9d9ee433f52d6a338d (patch) | |
| tree | 41b8e48faf028580b26fbae0cc5d6c39761307b1 /perl-install/fs | |
| parent | 97a7904701e5fe02af2c95c5eb0ffb83a7707b6d (diff) | |
| download | drakx-41e7676d8b316a5a7425cd9d9ee433f52d6a338d.tar drakx-41e7676d8b316a5a7425cd9d9ee433f52d6a338d.tar.gz drakx-41e7676d8b316a5a7425cd9d9ee433f52d6a338d.tar.bz2 drakx-41e7676d8b316a5a7425cd9d9ee433f52d6a338d.tar.xz drakx-41e7676d8b316a5a7425cd9d9ee433f52d6a338d.zip | |
enables to get raw available space (mga15257)
Diffstat (limited to 'perl-install/fs')
| -rw-r--r-- | perl-install/fs/any.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/fs/any.pm b/perl-install/fs/any.pm index ce85c616a..5133cae2a 100644 --- a/perl-install/fs/any.pm +++ b/perl-install/fs/any.pm @@ -106,11 +106,11 @@ sub getNeededMinSpace { } sub getAvailableSpace { - my ($fstab, $o_skip_mounted) = @_; + my ($fstab, $o_skip_mounted, $o_skip_min_space) = @_; my $n = !$::testing && !$o_skip_mounted && getAvailableSpace_mounted($::prefix) || getAvailableSpace_raw($fstab) * 512 / 1.07; - $n - getNeededMinSpace($n); + $o_skip_min_space ? $n : $n - getNeededMinSpace($n); } sub getAvailableSpace_mounted { |