summaryrefslogtreecommitdiffstats
path: root/urpm/cdrom.pm
diff options
context:
space:
mode:
Diffstat (limited to 'urpm/cdrom.pm')
-rw-r--r--urpm/cdrom.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/urpm/cdrom.pm b/urpm/cdrom.pm
index 55e26671..c09c55a2 100644
--- a/urpm/cdrom.pm
+++ b/urpm/cdrom.pm
@@ -65,7 +65,8 @@ sub _try_mounting_cdrom_using_hal {
eval { require Hal::Cdroms; 1 } or $urpm->{error}(N("You must mount CD-ROM yourself (or install perl-Hal-Cdroms to have it done automatically)")), return();
- my $hal_cdroms = Hal::Cdroms->new;
+ my $hal_cdroms = eval { Hal::Cdroms->new } or $urpm->{fatal}(N("HAL daemon (hald) is not running or not ready"));
+
foreach my $hal_path ($hal_cdroms->list) {
my $mntpoint;
if ($mntpoint = $hal_cdroms->get_mount_point($hal_path)) {