diff options
Diffstat (limited to 'lib/Hal')
-rw-r--r-- | lib/Hal/Cdroms.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Hal/Cdroms.pm b/lib/Hal/Cdroms.pm index fc81f11..ea13282 100644 --- a/lib/Hal/Cdroms.pm +++ b/lib/Hal/Cdroms.pm @@ -92,7 +92,7 @@ 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', 'Removable'); + return if !($drive && _get_property($drive, 'Drive', 'Removable')); return unless member(_get_property($device, 'Block', 'IdType'), 'iso9660', 'udf'); eval { _get_property($device, 'Filesystem', 'MountPoints') }; } @@ -117,7 +117,7 @@ sub _get_property { sub get_mount_point { my ($o, $udisks_path) = @_; my $mounts = _get_mount_points($o, $udisks_path); - _int_array_to_string($$mounts[0]) if @$mounts; + _int_array_to_string($mounts->[0]) if @$mounts; } sub _get_mount_points { |