diff options
author | Francois Pons <fpons@mandriva.com> | 2000-06-23 13:03:19 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2000-06-23 13:03:19 +0000 |
commit | c8d8767aa3dfeb049fd662080ac8cf2a7075ca56 (patch) | |
tree | e424b6ad6a2f2142554bee44cedd04d5016de938 /perl-install/fsedit.pm | |
parent | b8820f0b8f1a137b9baa11b76626ad79e47cb707 (diff) | |
download | drakx-backup-do-not-use-c8d8767aa3dfeb049fd662080ac8cf2a7075ca56.tar drakx-backup-do-not-use-c8d8767aa3dfeb049fd662080ac8cf2a7075ca56.tar.gz drakx-backup-do-not-use-c8d8767aa3dfeb049fd662080ac8cf2a7075ca56.tar.bz2 drakx-backup-do-not-use-c8d8767aa3dfeb049fd662080ac8cf2a7075ca56.tar.xz drakx-backup-do-not-use-c8d8767aa3dfeb049fd662080ac8cf2a7075ca56.zip |
*** empty log message ***
Diffstat (limited to 'perl-install/fsedit.pm')
-rw-r--r-- | perl-install/fsedit.pm | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index 6d30a73ab..599a7af5e 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -22,14 +22,9 @@ use log; #- Globals #-##################################################################################### my @suggestions = ( -arch() =~ /^sparc/ ? ( - { mntpoint => "/", size => 50 << 11, type => 0x83, ratio => 1, maxsize => 1000 << 11 }, - { mntpoint => "swap", size => 30 << 11, type => 0x82, ratio => 1, maxsize => 500 << 11 }, -) : ( + { mntpoint => "/boot", size => 16 << 11, type => 0x83, ratio => 1, maxsize => 30 << 11 }, { mntpoint => "/", size => 50 << 11, type => 0x83, ratio => 1, maxsize => 300 << 11 }, { mntpoint => "swap", size => 30 << 11, type => 0x82, ratio => 1, maxsize => 250 << 11 }, -), - { mntpoint => "/boot", size => 16 << 11, type => 0x83, ratio => 1, maxsize => 30 << 11 }, { mntpoint => "/usr", size => 200 << 11, type => 0x83, ratio => 6, maxsize =>3000 << 11 }, { mntpoint => "/home", size => 50 << 11, type => 0x83, ratio => 3 }, { mntpoint => "/var", size => 200 << 11, type => 0x83, ratio => 1, maxsize =>1000 << 11 }, @@ -168,7 +163,6 @@ sub computeSize($$$$) { } @l; } my $size = int min($max, $best->{size} + $free_space * ($tot_ratios && $best->{ratio} / $tot_ratios)); - #- verify other entry can fill the hole if (grep { $_->{size} < $max - $size } @L) { $size } else { $max } } |