emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

emacs-29 0676a029310: Extend D-Bus doc and test


From: Michael Albinus
Subject: emacs-29 0676a029310: Extend D-Bus doc and test
Date: Fri, 24 Nov 2023 10:34:39 -0500 (EST)

branch: emacs-29
commit 0676a02931014e64160c71207ab4ef8d4a33a9b1
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    Extend D-Bus doc and test
    
    * doc/misc/dbus.texi (Register Objects): Adapt doc of
    dbus-unregister-service.
    
    * test/lisp/net/dbus-tests.el (dbus--test-register-service):
    Extend test.
---
 doc/misc/dbus.texi          | 3 +++
 test/lisp/net/dbus-tests.el | 3 +++
 2 files changed, 6 insertions(+)

diff --git a/doc/misc/dbus.texi b/doc/misc/dbus.texi
index 2bd6b9556c8..9dff54ff94a 100644
--- a/doc/misc/dbus.texi
+++ b/doc/misc/dbus.texi
@@ -1418,6 +1418,9 @@ The name @var{service} does not exist on the bus.
 @item :not-owner
 We are not an owner of the name @var{service}.
 @end table
+
+When @var{service} is not a known name but a unique name, the function
+returns nil.
 @end defun
 
 When a name has been chosen, Emacs can offer its own methods, which
diff --git a/test/lisp/net/dbus-tests.el b/test/lisp/net/dbus-tests.el
index 418ae61bb42..66240efd882 100644
--- a/test/lisp/net/dbus-tests.el
+++ b/test/lisp/net/dbus-tests.el
@@ -465,6 +465,9 @@
   (should (eq (dbus-unregister-service bus dbus--test-service) :non-existent))
   (should-not (member dbus--test-service (dbus-list-known-names bus)))
 
+  ;; Unregistering a unique name returns nil.
+  (should-not (dbus-unregister-service bus ":1.1"))
+
   ;; A service name is a string, constructed of at least two words
   ;; separated by ".".
   (should



reply via email to

[Prev in Thread] Current Thread [Next in Thread]