From: Michael Albinus <michael.albinus@gmx.de>
Date: Fri, 28 Sep 2018 10:51:25 +0000 (+0200)
Subject: Fix Bug#32828
X-Git-Tag: emacs-26.1.90~128
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1908173a4d79649566fbef12962e251c69e300a2;p=emacs.git

Fix Bug#32828

* lisp/net/dbus.el (dbus-init-bus): Return number of connections,
as promised by the docstring.  (Bug#32828)
---

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