diff options
author | carlosg <carlosg> | 2007-09-25 22:46:33 +0000 |
---|---|---|
committer | carlosg <carlosg> | 2007-09-25 22:46:33 +0000 |
commit | 1a4e46e3cb6dee8a5cfeb298dee76284fc24d2b6 (patch) | |
tree | 6c9b6e584d2e20f916495ff91e6623c37a50737c /Platform.pm | |
parent | e3c135d4be92eff11fc66ee3172b522d6c01441e (diff) |
2007-09-26 Carlos Garnacho <carlosg@gnome.org>
Add a diagnostics tool, returns the whole system configuration
without using DBus, it's way easier to debug problems when dealing
with the distro.
* Utils/Backend.pm: Remove DBus usage, move DBus related functions to:
* Utils/DBus.pm: new file.
* Utils/Makefile: added here too.
* SystemToolsBackend.pl.in: error out if no module was requested here.
* Platform: use Utils::DBus.
* StbObject.pm: use Utils::DBus. ensure platform and set counter here.
* diagnostics.pl: new tool, uses the s-t-b core, which doesn't depend
on DBus anymore.
Diffstat (limited to 'Platform.pm')
-rw-r--r-- | Platform.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Platform.pm b/Platform.pm index c2a2ef7..b4782d6 100644 --- a/Platform.pm +++ b/Platform.pm @@ -26,6 +26,7 @@ use base qw(Net::DBus::Object); use Net::DBus::Exporter ($Utils::Backend::DBUS_PREFIX . ".Platform"); use Utils::Platform; use Utils::Backend; +use Utils::DBus; my $OBJECT_NAME = "Platform"; my $OBJECT_PATH = "$Utils::Backend::DBUS_PATH/$OBJECT_NAME"; @@ -77,7 +78,7 @@ sub setPlatform &Utils::Platform::set_platform ($platform); } -my $bus = &Utils::Backend::get_bus (); +my $bus = &Utils::DBus::get_bus (); my $service = $bus->export_service ($Utils::Backend::DBUS_PREFIX . ".$OBJECT_NAME"); my $platforms_list = Platform->new ($service); |