From f332e5d67fa625a1948bd2b8c2b6beda127cf516 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Wed, 30 Apr 2008 19:24:51 +0000
Subject: add support for using dbus-send to select a network (will require
 some way to get network IDs first)

---
 lib/network/monitor.pm | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

(limited to 'lib/network/monitor.pm')

diff --git a/lib/network/monitor.pm b/lib/network/monitor.pm
index fb9247a..43e9e78 100644
--- a/lib/network/monitor.pm
+++ b/lib/network/monitor.pm
@@ -105,7 +105,16 @@ sub list_wireless {
 sub select_network {
     my ($o, $id) = @_;
     my $method = 'SelectNetwork';
-    $o->call_method($method, Net::DBus::dbus_uint32($id));
+    if ($o) {
+        $o->call_method($method, Net::DBus::dbus_uint32($id));
+    } else {
+        require run_program;
+        run_program::run("dbus-send", "--system", "--type=method_call",
+                         "--dest=" . $monitor_service,
+                         $monitor_path,
+                         $monitor_interface . '.' . $method,
+                         'uint32:' . $id);
+    }
 }
 
 1;
-- 
cgit v1.2.1