diff options
| -rw-r--r-- | lib/Hal/Cdroms.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/Hal/Cdroms.pm b/lib/Hal/Cdroms.pm index 5a8ff38..af9f1f9 100644 --- a/lib/Hal/Cdroms.pm +++ b/lib/Hal/Cdroms.pm @@ -93,6 +93,12 @@ sub _get_volume { my ($o, $hal_path) = @_; $o->{hal}->get_object($hal_path, "$hal_dn.Device.Volume"); } + +sub _GetProperty { + my ($device, $pname) = @_; + $device->Get('org.freedesktop.DBus.Properties', $pname); +} + sub get_mount_point { my ($o, $hal_path) = @_; |