summaryrefslogtreecommitdiffstats
path: root/perl-install/devices.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2010-05-04 09:36:04 +0000
committerOlivier Blin <oblin@mandriva.com>2010-05-04 09:36:04 +0000
commit90d4fc763bfddf81b58000589620fc24ed325127 (patch)
tree1c11fc893783798890a341906a95aebda40022ff /perl-install/devices.pm
parent330559705256a6473a6a1324bf8079f3e3fd7c35 (diff)
downloaddrakx-backup-do-not-use-90d4fc763bfddf81b58000589620fc24ed325127.tar
drakx-backup-do-not-use-90d4fc763bfddf81b58000589620fc24ed325127.tar.gz
drakx-backup-do-not-use-90d4fc763bfddf81b58000589620fc24ed325127.tar.bz2
drakx-backup-do-not-use-90d4fc763bfddf81b58000589620fc24ed325127.tar.xz
drakx-backup-do-not-use-90d4fc763bfddf81b58000589620fc24ed325127.zip
add missing prefix
Diffstat (limited to 'perl-install/devices.pm')
-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 8ddba04be..3b2761ad0 100644
--- a/perl-install/devices.pm
+++ b/perl-install/devices.pm
@@ -176,7 +176,7 @@ sub entry {
# Try to access directly the device
# Now device mapper devices are links and do not appear in /proc or /sys
unless ($type) {
- if (-e "/dev/$_") {
+ if (-e "$::prefix/dev/$_") {
my (undef,undef,$mode,undef,undef,undef,$rdev,undef) = stat("$::prefix/dev/$_");
($major, $minor) = unmakedev($rdev);
$type = $mode & c::S_IFMT();