From c652c566ef6574bbf589ec5e3b687b25d211ff50 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sat, 20 Jul 2002 21:37:53 +0000
Subject: call config_dvd with $have_devfsd

---
 perl-install/install_steps.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'perl-install/install_steps.pm')

diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 037ea2273..c27787e38 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -407,10 +407,11 @@ Consoles 1,3,4,7 may also contain interesting information";
     #-  why not? cuz weather is nice today :-) [pixel]
     common::sync(); common::sync();
 
-    if (do {
+    my $have_devfsd = do {
 	my $p = pkgs::packageByName($o->{packages}, 'devfsd');
 	$p && $p->flag_installed
-    }) {
+    };
+    if ($have_devfsd) {
         require bootloader;
 	bootloader::may_append($o->{bootloader}, devfs => 'mount');
     }
@@ -424,7 +425,7 @@ Consoles 1,3,4,7 may also contain interesting information";
     #- for mandrake_firstime
     touch "$o->{prefix}/var/lock/TMP_1ST";
 
-    any::config_dvd($o->{prefix});
+    any::config_dvd($o->{prefix}, $have_devfsd);
     any::config_mtools($o->{prefix});
 
     any::writeandclean_ldsoconf($o->{prefix});
-- 
cgit v1.2.1