Fix a dbus.el byte compilation warning

* lisp/net/dbus.el (dbus-register-monitor): Silence a byte-compilation warning on systems without dbus.
emacs-mirror · Mar 28, 2021 · ee3a4e3 · ee3a4e3
1 parent 216c65b
commit ee3a4e3
Showing 1 changed file with 3 additions and 2 deletions.
diff --git 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)