diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2020-09-21 13:41:30 +0200 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2020-09-21 13:41:30 +0200 |
commit | 63f9d9af81a2758bfb3699ce223d9cbf891257d6 (patch) | |
tree | cbc9dd6e1103dc8425ab4dd78ad5e0a6f3b5e749 /src/dbusbind.c | |
parent | 81aed7becfdc66af464e54c90680e9507693bdaf (diff) | |
download | emacs-63f9d9af81a2758bfb3699ce223d9cbf891257d6.tar.gz |
Add D-Bus tests
* doc/misc/dbus.texi (Type Conversion): Precise basic type values.
* lisp/net/dbus.el (dbus-register-property): Send signal directly.
* src/dbusbind.c (xd_signature): Accept non-nil objects for
DBUS_TYPE_BOOLEAN.
* test/lisp/net/dbus-tests.el (dbus-test01-basic-types)
(dbus-test01-compound-types): New tests.
Diffstat (limited to 'src/dbusbind.c')
-rw-r--r-- | src/dbusbind.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/dbusbind.c b/src/dbusbind.c index eb883e5dc83..4c5ab485803 100644 --- a/src/dbusbind.c +++ b/src/dbusbind.c @@ -374,8 +374,8 @@ xd_signature (char *signature, int dtype, int parent_type, Lisp_Object object) break; case DBUS_TYPE_BOOLEAN: - if (!EQ (object, Qt) && !NILP (object)) - wrong_type_argument (intern ("booleanp"), object); + /* Any non-nil object will be regarded as `t', so we don't apply + further type check. */ sprintf (signature, "%c", dtype); break; |