summaryrefslogtreecommitdiffstats
path: root/perl-install/fsedit.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-08-31 22:52:13 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-08-31 22:52:13 +0000
commit63746e561f4804236803986cc19de6664d95dc1c (patch)
treea7616c7c879bbffa73166862b064e9402cf6a8b4 /perl-install/fsedit.pm
parent49c296107afd9cf7efb7388830d9c5785b96fd9f (diff)
downloaddrakx-63746e561f4804236803986cc19de6664d95dc1c.tar
drakx-63746e561f4804236803986cc19de6664d95dc1c.tar.gz
drakx-63746e561f4804236803986cc19de6664d95dc1c.tar.bz2
drakx-63746e561f4804236803986cc19de6664d95dc1c.tar.xz
drakx-63746e561f4804236803986cc19de6664d95dc1c.zip
no_comment
Diffstat (limited to 'perl-install/fsedit.pm')
-rw-r--r--perl-install/fsedit.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm
index 67df5da48..6d07796d6 100644
--- a/perl-install/fsedit.pm
+++ b/perl-install/fsedit.pm
@@ -29,7 +29,8 @@ my @suggestions_mntpoints = qw(/mnt/dos);
sub suggestions_mntpoint($) {
my ($hds) = @_;
- sort @suggestions_mntpoints, grep { !/swap/ && !has_mntpoint($_, $hds) } map { $_->{mntpoint} } @suggestions;
+ sort grep { !/swap/ && !has_mntpoint($_, $hds) }
+ (@suggestions_mntpoints, map { $_->{mntpoint} } @suggestions);
}
sub hds($$) {