Fix a dbus.el byte compilation warning

* lisp/net/dbus.el (dbus-register-monitor): Silence a
byte-compilation warning on systems without dbus.
This commit is contained in:
Lars Ingebrigtsen 2021-03-28 19:22:15 +02:00
parent 216c65b135
commit ee3a4e3d1b

View file

@ -2029,8 +2029,9 @@ either a method name, a signal name, or an error name."
",")
rule (or rule ""))
(unless (ignore-errors (dbus-get-unique-name bus-private))
(dbus-init-bus bus 'private))
(when (fboundp 'dbus-get-unique-name)
(unless (ignore-errors (dbus-get-unique-name bus-private))
(dbus-init-bus bus 'private)))
(dbus-call-method
bus-private dbus-service-dbus dbus-path-dbus dbus-interface-monitoring
"BecomeMonitor" `(:array :string ,rule) :uint32 0)