summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-12-13 21:11:05 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-12-13 21:11:05 +0000
commitb0be6b39098a7365e2efa3b8ed4f89059b3b2f6d (patch)
treed39cc8b437422c6df85ce9cbe5a891bfd4726c2c /perl-install
parent3b087d9943e5abece78c5e844d2f531515db839d (diff)
downloaddrakx-backup-do-not-use-b0be6b39098a7365e2efa3b8ed4f89059b3b2f6d.tar
drakx-backup-do-not-use-b0be6b39098a7365e2efa3b8ed4f89059b3b2f6d.tar.gz
drakx-backup-do-not-use-b0be6b39098a7365e2efa3b8ed4f89059b3b2f6d.tar.bz2
drakx-backup-do-not-use-b0be6b39098a7365e2efa3b8ed4f89059b3b2f6d.tar.xz
drakx-backup-do-not-use-b0be6b39098a7365e2efa3b8ed4f89059b3b2f6d.zip
(add_options): drop (unused, use mount_options_unpack + mount_options_pack instead)
(mount_all): drop (unused, use formatMount_all instead)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fs.pm19
1 files changed, 0 insertions, 19 deletions
diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index d6445596b..42c0a9bee 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -298,14 +298,6 @@ sub mount_options {
\%non_defaults, \@user_implies;
}
-# simple function
-# use mount_options_unpack + mount_options_pack for advanced stuff
-sub add_options(\$@) {
- my ($option, @options) = @_;
- my %l; @l{split(',', $$option), @options} = (); delete $l{defaults};
- $$option = join(',', keys %l) || "defaults";
-}
-
sub mount_options_unpack {
my ($part) = @_;
my $packed_options = $part->{options};
@@ -806,17 +798,6 @@ sub umount_part {
$part->{isMounted} = 0;
}
-sub mount_all($;$$) {
- my ($fstab, $prefix) = @_;
-
- log::l("mounting all filesystems");
-
- #- order mount by alphabetical order, that way / < /home < /home/httpd...
- foreach (sort { $a->{mntpoint} cmp $b->{mntpoint} } grep { isSwap($_) || $_->{mntpoint} && isTrueFS($_) } @$fstab) {
- mount_part($_, $prefix);
- }
-}
-
sub umount_all($;$) {
my ($fstab, $prefix) = @_;