diff options
| -rw-r--r-- | lib/Hal/Cdroms.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Hal/Cdroms.pm b/lib/Hal/Cdroms.pm index dfb2585..0d4b235 100644 --- a/lib/Hal/Cdroms.pm +++ b/lib/Hal/Cdroms.pm @@ -88,7 +88,8 @@ sub _is_cdrom { my ($o, $udisks_path) = @_; my $device = _get_device($o, $udisks_path); my $drive = _get_drive($o, $device); - return unless $drive && _get_property($drive, 'Drive', 'Optical'); + return unless $drive && _get_property($drive, 'Drive', 'Removable'); + return unless member(_get_property($device, 'Block', 'IdType'), 'iso9660', 'udf'); eval { _get_property($device, 'Filesystem', 'MountPoints') }; } |