diff options
| -rw-r--r-- | lib/Hal/Cdroms.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/Hal/Cdroms.pm b/lib/Hal/Cdroms.pm index af9f1f9..5e32c7d 100644 --- a/lib/Hal/Cdroms.pm +++ b/lib/Hal/Cdroms.pm @@ -85,10 +85,16 @@ Return the mount point associated to the C<hal_path>, or undef it is not mounted =cut -sub _get_device { +sub _get_udisks_device { my ($o, $hal_path) = @_; $o->{hal}->get_object($hal_path, "$hal_dn.Device"); } + +sub _get_device { + my ($o, $hal_path) = @_; + $o->{hal}->get_object($hal_path, 'org.freedesktop.DBus.Properties'); +} + sub _get_volume { my ($o, $hal_path) = @_; $o->{hal}->get_object($hal_path, "$hal_dn.Device.Volume"); |