From ea59d2a78f08e2e20a72f335496db9433c4df0a4 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Thu, 20 Mar 2008 01:18:10 +0000
Subject: allow to skip "mounted" implementation (for draklive-install)

---
 perl-install/fs/any.pm | 4 ++--
 1 file 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);
 }
-- 
cgit v1.2.1