summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-08-05 04:59:20 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-08-05 04:59:20 +0000
commit17c81d6415891a7cb83eecafd31efd22e101119c (patch)
tree243770265a31daca0c26d35e779329e020e23333 /perl-install
parentac9ed2e1d394d4e30699c9c8f36b8a9e7859a738 (diff)
downloaddrakx-17c81d6415891a7cb83eecafd31efd22e101119c.tar
drakx-17c81d6415891a7cb83eecafd31efd22e101119c.tar.gz
drakx-17c81d6415891a7cb83eecafd31efd22e101119c.tar.bz2
drakx-17c81d6415891a7cb83eecafd31efd22e101119c.tar.xz
drakx-17c81d6415891a7cb83eecafd31efd22e101119c.zip
/usr/sbin/ofpath seems to need /mnt/sys mounted, and the device must exist (Christiaan Welvaart)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootloader.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 8116c7d2b..84251663f 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -827,6 +827,10 @@ sub set_profiles {
sub get_of_dev {
my ($unix_dev) = @_;
+
+ eval { fs::mount('none', '$::prefix/sys', 'sysfs', 0) } if -d "$::prefix/sys/devices";
+ devices::make("$::prefix$unix_dev");
+
my $of_dev;
run_program::rooted_or_die($::prefix, "/usr/sbin/ofpath", ">", \$of_dev, $unix_dev);
chomp($of_dev);