diff options
| -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 | |||
| 1791 | this connection to those buses." | 1791 | this connection to those buses." |
| 1792 | (or (featurep 'dbusbind) | 1792 | (or (featurep 'dbusbind) |
| 1793 | (signal 'dbus-error (list "Emacs not compiled with dbus support"))) | 1793 | (signal 'dbus-error (list "Emacs not compiled with dbus support"))) |
| 1794 | (dbus--init-bus bus private) | 1794 | (prog1 |
| 1795 | (dbus-register-signal | 1795 | (dbus--init-bus bus private) |
| 1796 | bus nil dbus-path-local dbus-interface-local | 1796 | (dbus-register-signal |
| 1797 | "Disconnected" #'dbus-handle-bus-disconnect)) | 1797 | bus nil dbus-path-local dbus-interface-local |
| 1798 | "Disconnected" #'dbus-handle-bus-disconnect))) | ||
| 1798 | 1799 | ||
| 1799 | 1800 | ||
| 1800 | ;; Initialize `:system' and `:session' buses. This adds their file | 1801 | ;; Initialize `:system' and `:session' buses. This adds their file |