summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2010-05-03 15:28:26 +0000
committerPascal Terjan <pterjan@mandriva.org>2010-05-03 15:28:26 +0000
commit6a6b2e797ca660aedd95d6b6d8041fd95bf21d6e (patch)
treec8be723046c09a50149e1531fd2729e274d7cd9a /perl-install
parent80ca8eeb6588578c99622b70aaa121df73eefc93 (diff)
downloaddrakx-6a6b2e797ca660aedd95d6b6d8041fd95bf21d6e.tar
drakx-6a6b2e797ca660aedd95d6b6d8041fd95bf21d6e.tar.gz
drakx-6a6b2e797ca660aedd95d6b6d8041fd95bf21d6e.tar.bz2
drakx-6a6b2e797ca660aedd95d6b6d8041fd95bf21d6e.tar.xz
drakx-6a6b2e797ca660aedd95d6b6d8041fd95bf21d6e.zip
Look for device inside chroot
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/devices.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/devices.pm b/perl-install/devices.pm
index 719472cea..8ddba04be 100644
--- a/perl-install/devices.pm
+++ b/perl-install/devices.pm
@@ -177,7 +177,7 @@ sub entry {
# Now device mapper devices are links and do not appear in /proc or /sys
unless ($type) {
if (-e "/dev/$_") {
- my (undef,undef,$mode,undef,undef,undef,$rdev,undef) = stat("/dev/$_");
+ my (undef,undef,$mode,undef,undef,undef,$rdev,undef) = stat("$::prefix/dev/$_");
($major, $minor) = unmakedev($rdev);
$type = $mode & c::S_IFMT();
}