summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-12-17 11:36:46 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-12-17 11:36:46 +0000
commitb0ecc75d700b4a9500d1e13be125c9d48d42092e (patch)
tree4b9470ec0b317d26c1b61aae30cc7dfb75677258 /perl-install/any.pm
parentf26c4abbc6209dfffca97c959a4b7376a8b1e989 (diff)
downloaddrakx-backup-do-not-use-b0ecc75d700b4a9500d1e13be125c9d48d42092e.tar
drakx-backup-do-not-use-b0ecc75d700b4a9500d1e13be125c9d48d42092e.tar.gz
drakx-backup-do-not-use-b0ecc75d700b4a9500d1e13be125c9d48d42092e.tar.bz2
drakx-backup-do-not-use-b0ecc75d700b4a9500d1e13be125c9d48d42092e.tar.xz
drakx-backup-do-not-use-b0ecc75d700b4a9500d1e13be125c9d48d42092e.zip
clean_tmp now means using tmpfs
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm11
1 files changed, 10 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 80d82a4e4..6c6135c7a 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -147,6 +147,7 @@ sub setupBootloader {
my $bootloader = arch() =~ /sparc/ ? __("SILO") : arch() =~ /ppc/ ? __("Yaboot") : __("LILO with graphical menu");
my $profiles = bootloader::has_profiles($b);
my $memsize = bootloader::get_append($b, 'mem');
+ my $prev_clean_tmp = my $clean_tmp = grep { $_->{mntpoint} eq '/tmp' } @{$hds->{special}};
$b->{vga} ||= 'Normal';
if (arch !~ /ppc/) {
@@ -166,7 +167,7 @@ sub setupBootloader {
{ label => _("Password (again)"), val => \$b->{password2}, hidden => 1 },
{ label => _("Restrict command line options"), val => \$b->{restricted}, type => "bool", text => _("restrict") },
),
-{ label => _("Clean /tmp at each boot"), val => \$b->{CLEAN_TMP}, type => 'bool', advanced => 1 },
+{ label => _("Clean /tmp at each boot"), val => \$clean_tmp, type => 'bool', advanced => 1 },
{ label => _("Precise RAM size if needed (found %d MB)", availableRamMB()), val => \$memsize, advanced => 1 },
if_(detect_devices::isLaptop,
{ label => _("Enable multi profiles"), val => \$profiles, type => 'bool', advanced => 1 },
@@ -204,6 +205,14 @@ sub setupBootloader {
bootloader::set_profiles($b, $profiles);
bootloader::add_append($b, "mem", $memsize);
+
+ if ($prev_clean_tmp != $clean_tmp) {
+ if ($clean_tmp) {
+ push @{$hds->{special}}, { device => 'none', mntpoint => '/tmp', type => 'tmpfs' };
+ } else {
+ @{$hds->{special}} = grep { $_->{mntpoint} eq '/tmp' } @{$hds->{special}};
+ }
+ }
}
$ask_per_entries or return 1;