diff options
| author | Hugh Daschbach <hdasch@fastmail.com> | 2020-10-12 11:37:27 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2020-10-12 11:37:27 +0200 |
| commit | 2f92177f80fb375fdf38d6db0af9853e951e9b83 (patch) | |
| tree | 3534a00396562435584dd794f6d3cd6ce7d50820 /lisp/net/dbus.el | |
| parent | 608782b3474abc317e64064929ad7351506540ed (diff) | |
| download | emacs-2f92177f80fb375fdf38d6db0af9853e951e9b83.tar.gz emacs-2f92177f80fb375fdf38d6db0af9853e951e9b83.tar.bz2 emacs-2f92177f80fb375fdf38d6db0af9853e951e9b83.zip | |
Add interface arg to D-Bus PropertiesChanged signal.
* lisp/net/dbus.el (dbus-register-property, dbus-property-handler):
Fix signal generation. (Bug#43936)
* test/lisp/net/dbus-tests.el (dbus-test06-register-property-emits-signal):
Fix test.
Diffstat (limited to 'lisp/net/dbus.el')
| -rw-r--r-- | lisp/net/dbus.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/net/dbus.el b/lisp/net/dbus.el index 77ba5266dcb..bb2420e1f49 100644 --- a/lisp/net/dbus.el +++ b/lisp/net/dbus.el @@ -1740,6 +1740,7 @@ clients from discovering the still incomplete interface. (when emits-signal (dbus-send-signal bus service path dbus-interface-properties "PropertiesChanged" + interface ;; changed_properties. (if (eq access :write) '(:array: :signature "{sv}") @@ -1818,6 +1819,7 @@ It will be registered for all objects created by `dbus-register-property'." (when (nth 1 object) (dbus-send-signal bus service path dbus-interface-properties "PropertiesChanged" + interface ;; changed_properties. (if (eq :write (car object)) '(:array: :signature "{sv}") |