summaryrefslogtreecommitdiffstats
path: root/perl-install/fs/get.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-06-10 04:40:18 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-06-10 04:40:18 +0000
commit6e230863720c63b6a39a53f3c0a15de771a373d2 (patch)
treed61f413104635c5a259455c4acbdc6e628650a59 /perl-install/fs/get.pm
parentc130de3109b46c9c0783f9d600c38cea9b5bb46e (diff)
downloaddrakx-backup-do-not-use-6e230863720c63b6a39a53f3c0a15de771a373d2.tar
drakx-backup-do-not-use-6e230863720c63b6a39a53f3c0a15de771a373d2.tar.gz
drakx-backup-do-not-use-6e230863720c63b6a39a53f3c0a15de771a373d2.tar.bz2
drakx-backup-do-not-use-6e230863720c63b6a39a53f3c0a15de771a373d2.tar.xz
drakx-backup-do-not-use-6e230863720c63b6a39a53f3c0a15de771a373d2.zip
move loopback.pm to fs/loopback.pm
(since it's tightly tight to many fs* things)
Diffstat (limited to 'perl-install/fs/get.pm')
-rw-r--r--perl-install/fs/get.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/fs/get.pm b/perl-install/fs/get.pm
index 6b982c1e9..dca0a5aa9 100644
--- a/perl-install/fs/get.pm
+++ b/perl-install/fs/get.pm
@@ -5,6 +5,7 @@ use strict;
use partition_table;
use fs::type;
+use fs::loopback;
use fs;
use common;
use log;
@@ -87,7 +88,7 @@ sub file2part {
$file = $b_keep_simple_symlinks ? common::expand_symlinks_but_simple("$::prefix$file") : expand_symlinks("$::prefix$file");
unless ($file =~ s/^$::prefix//) {
- my $part = find { loopback::carryRootLoopback($_) } @$fstab or die;
+ my $part = find { fs::loopback::carryRootLoopback($_) } @$fstab or die;
log::l("found $part->{mntpoint}");
$file =~ s|/initrd/loopfs|$part->{mntpoint}|;
}