summaryrefslogtreecommitdiffstats
path: root/perl-install/fs
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2008-03-20 01:18:10 +0000
committerOlivier Blin <oblin@mandriva.com>2008-03-20 01:18:10 +0000
commitea59d2a78f08e2e20a72f335496db9433c4df0a4 (patch)
treece31a469e7c877d168538179e53576423a28758d /perl-install/fs
parent440ffe22ded3de7604e00d6c98e24e1069ebf378 (diff)
downloaddrakx-backup-do-not-use-ea59d2a78f08e2e20a72f335496db9433c4df0a4.tar
drakx-backup-do-not-use-ea59d2a78f08e2e20a72f335496db9433c4df0a4.tar.gz
drakx-backup-do-not-use-ea59d2a78f08e2e20a72f335496db9433c4df0a4.tar.bz2
drakx-backup-do-not-use-ea59d2a78f08e2e20a72f335496db9433c4df0a4.tar.xz
drakx-backup-do-not-use-ea59d2a78f08e2e20a72f335496db9433c4df0a4.zip
allow to skip "mounted" implementation (for draklive-install)
Diffstat (limited to 'perl-install/fs')
-rw-r--r--perl-install/fs/any.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/fs/any.pm b/perl-install/fs/any.pm
index 730252b40..0d8b3ba7d 100644
--- a/perl-install/fs/any.pm
+++ b/perl-install/fs/any.pm
@@ -105,7 +105,7 @@ sub prepare_minimal_root {
}
sub getAvailableSpace {
- my ($fstab) = @_;
+ my ($fstab, $o_skip_mounted) = @_;
#- make sure of this place to be available for installation, this could help a lot.
#- currently doing a very small install use 36Mb of postinstall-rpm, but installing
@@ -113,7 +113,7 @@ sub getAvailableSpace {
#- 65mb may be a good choice to avoid almost all problem of insuficient space left...
my $minAvailableSize = 65 * sqr(1024);
- my $n = !$::testing && getAvailableSpace_mounted($::prefix) ||
+ my $n = !$::testing && !$o_skip_mounted && getAvailableSpace_mounted($::prefix) ||
getAvailableSpace_raw($fstab) * 512 / 1.07;
$n - max(0.1 * $n, $minAvailableSize);
}