[Emacs-diffs] emacs-26 1908173: Fix Bug#32828

[Michael Albinus]

branch: emacs-26
commit 1908173a4d79649566fbef12962e251c69e300a2
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    Fix Bug#32828
    
    * lisp/net/dbus.el (dbus-init-bus): Return number of connections,
    as promised by the docstring.  (Bug#32828)
---
 lisp/net/dbus.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/lisp/net/dbus.el b/lisp/net/dbus.el
index f63ab9a..5f44c36 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