summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install2.pm2
-rw-r--r--perl-install/install_steps_interactive.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index af3a40040..f9bebe686 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -494,7 +494,7 @@ sub main {
}
$o->{interactive} ||= 'gtk' if !$::auto_install;
- if ($o->{interactive} eq "gtk" && availableMemory < 22 * 1024) {
+ if ($o->{interactive} eq "gtk" && availableMemory() < 22 * 1024) {
log::l("switching to newt install cuz not enough memory");
$o->{interactive} = "newt";
}
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 798d6fcf5..7374e8592 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -469,7 +469,7 @@ sub formatMountPartitions {
$@ =~ /fsck failed on (\S+)/ or return;
$o->ask_yesorno('', N("Failed to check filesystem %s. Do you want to repair the errors? (beware, you can loose data)", $1), 1);
};
- die N("Not enough swap space to fulfill installation, please add some") if availableMemory < 40 * 1024;
+ die N("Not enough swap space to fulfill installation, please add some") if availableMemory() < 40 * 1024;
}
#------------------------------------------------------------------------------