luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

[GB.DBUS]

Browse source 
* NEW: Add the DBus error message to the Gambas error message when 
  registering or unregistering fails.


git-svn-id: svn://localhost/gambas/trunk@5180 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2012-09-21 08:21:27 +00:00
parent 3f8c71a8db
commit d76f3be8f5
4 changed files with 18 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gb.dbus/src/gb.dbus/.project
View file

@ -1,8 +1,8 @@
# Gambas Project File 3.0
# Compiled with Gambas 3.2.90
# Compiled with Gambas 3.3.0
Title=gb.dbus
Startup=MMain
Version=3.2.90
Version=3.3.0
VersionFile=1
Component=gb.dbus
TabSize=2

6
gb.dbus/src/gb.dbus/.settings
View file

@ -48,12 +48,12 @@ SearchComment=False
SearchString=True
[OpenFile]
File[1]=".src/MMain.module:4.2"
Active=1
File[1]=".src/MMain.module:4.0"
File[2]=".src/DBusApplication.class:91.0"
File[3]=".src/DBus.class:10.0"
File[3]=".src/DBus.class:73.7"
File[4]=".src/DBusProxy.class:168.0"
File[5]=".src/DBusObject.class:451.0"
Active=6
File[6]=".src/CTest.class:60.0"
File[7]=".src/DBusSignal.class:6.0"
File[8]=".src/CTest2.class:9.0"

12
gb.dbus/src/gb.dbus/.src/MMain.module
View file

@ -1,6 +1,6 @@
' Gambas module file
Public Sub Main()
Public Sub Main2()
Dim aVal As Variant[]
Dim hSignal As DBusSignal
@ -89,3 +89,13 @@ Public Sub MySignal_Signal(Method As String, Arguments As Variant[])
Debug Method
End
Public Sub Main()
' Dim hobject As New MyObject
'
' DBus.Name = "org.gambas.somethingiswrong"
'
' DBus.System.Register(hobject, "/path/object")
End

4
gb.dbus/src/helper.c
View file

@ -1069,7 +1069,7 @@ bool DBUS_register(DBusConnection *connection, const char *name, bool unique)
if (dbus_error_is_set(&error))
{
GB.Error("Unable to register application name");
GB.Error("Unable to register application name: &1", error.message);
dbus_error_free(&error);
return TRUE;
}
@ -1090,7 +1090,7 @@ bool DBUS_unregister(DBusConnection *connection, const char *name)
if (dbus_error_is_set(&error))
{
GB.Error("Unable to unregister application name");
GB.Error("Unable to unregister application name: &1", error.message);
dbus_error_free(&error);
return TRUE;
}