diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2018-09-28 12:51:25 +0200 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2018-09-28 12:51:25 +0200 |
commit | 1908173a4d79649566fbef12962e251c69e300a2 (patch) | |
tree | 6fcf23b31236eae47c73b59201ea90e2093aff64 /lisp/net/dbus.el | |
parent | 7f5086da051aaf80e44db9d6f682a259ff1c686b (diff) | |
download | emacs-1908173a4d79649566fbef12962e251c69e300a2.tar.gz |
Fix Bug#32828
* lisp/net/dbus.el (dbus-init-bus): Return number of connections,
as promised by the docstring. (Bug#32828)
Diffstat (limited to 'lisp/net/dbus.el')
-rw-r--r-- | lisp/net/dbus.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/net/dbus.el b/lisp/net/dbus.el index f63ab9a15a8..5f44c360342 100644 --- a/lisp/net/dbus.el +++ b/lisp/net/dbus.el @@ -1791,10 +1791,11 @@ GTK+. It should be used with care for at least the `:system' and this connection to those buses." (or (featurep 'dbusbind) (signal 'dbus-error (list "Emacs not compiled with dbus support"))) - (dbus--init-bus bus private) - (dbus-register-signal - bus nil dbus-path-local dbus-interface-local - "Disconnected" #'dbus-handle-bus-disconnect)) + (prog1 + (dbus--init-bus bus private) + (dbus-register-signal + bus nil dbus-path-local dbus-interface-local + "Disconnected" #'dbus-handle-bus-disconnect))) ;; Initialize `:system' and `:session' buses. This adds their file |