From 42f941896ccc76632a201766bdbf2ff7d48cf768 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 28 Jan 2003 17:48:24 +0000
Subject: log configured dvds for better post-debugging

---
 perl-install/any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/perl-install/any.pm b/perl-install/any.pm
index 4072ff5b7..a2146b6bc 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -847,7 +847,7 @@ sub config_dvd {
 
     my @dvds = grep { detect_devices::isDvdDrive($_) } detect_devices::cdroms__faking_ide_scsi() or return;
 
-    log::l("configuring DVD");
+    log::l("configuring DVD: " . join(" ", map { $_->{device} } @dvds));
     #- create /dev/dvd symlink
     each_index {
 	devfssymlinkf($_, 'dvd' . ($::i ? $::i + 1 : ''));
-- 
cgit v1.2.1