summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-06-07 01:40:24 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-06-07 01:40:24 +0000
commitb61d71a761ab7aad865622203dda319ec279ed63 (patch)
tree2e3ec8ec1427dfe04fea59531f3ec9e814bc8236 /perl-install
parentfb43d5660d8ef1948a52d9321407e89d4a45f953 (diff)
downloaddrakx-b61d71a761ab7aad865622203dda319ec279ed63.tar
drakx-b61d71a761ab7aad865622203dda319ec279ed63.tar.gz
drakx-b61d71a761ab7aad865622203dda319ec279ed63.tar.bz2
drakx-b61d71a761ab7aad865622203dda319ec279ed63.tar.xz
drakx-b61d71a761ab7aad865622203dda319ec279ed63.zip
allow inspecting nfs
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index b5fd95ec9..c1db06151 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -574,7 +574,7 @@ sub inspect {
$dir = '';
} else {
mkdir $dir, 0700;
- eval { fs::mount(devices::make($part->{device}), $dir, $part->{fs_type}, !$b_rw) };
+ eval { fs::mount(fs::part2wild_device_name('', $part), $dir, $part->{fs_type}, !$b_rw) };
$@ and return;
}
my $h = before_leaving {