From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 28 Mar 2021 17:22:15 +0000 (+0200)
Subject: Fix a dbus.el byte compilation warning
X-Git-Tag: emacs-28.0.90~3107
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ee3a4e3d1be656cd0df71ed197dc5f102556f0e0;p=emacs.git

Fix a dbus.el byte compilation warning

* lisp/net/dbus.el (dbus-register-monitor): Silence a
byte-compilation warning on systems without dbus.
---

diff --git a/lisp/net/dbus.el b/lisp/net/dbus.el
index 1e7f836d820..4116d293e1b 100644
--- a/lisp/net/dbus.el
+++ b/lisp/net/dbus.el
@@ -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)