[seed] Add get_bus_type_from_object

[Robert Carr <racarr src gnome org>]

commit e151d404cd51a9971f40e7da6d9d33735ce97e75
Author: Robert Carr <racarr svn gnome org>
Date:   Sat May 9 17:05:21 2009 -0400

    Add get_bus_type_from_object
---
 modules/dbus/module.c |   11 +++++++++++
 1 files changed, 11 insertions(+), 0 deletions(-)

diff --git a/modules/dbus/module.c b/modules/dbus/module.c
index 34f18a3..1a6599d 100644
--- a/modules/dbus/module.c
+++ b/modules/dbus/module.c
@@ -15,6 +15,17 @@ static DBusConnection *system_bus = NULL;
 
 SeedObject bus_proto;
 
+static DBusBusType
+get_bus_type_from_object (SeedContext ctx,
+			  SeedObject object,
+			  SeedException *exception)
+{
+  SeedValue jsbus_type = seed_object_get_property (ctx, object, "_dbusBusType");
+  
+  return seed_value_to_int (ctx, jsbus_type, exception);
+}
+			  
+
 static SeedValue
 seed_js_dbus_get_machine_id (SeedContext ctx,
 			     SeedObject object,