mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-06 03:40:56 -08:00
Code Issues Projects Releases Wiki Activity

Fix bug#51369

Browse source 
* test/lisp/net/dbus-tests.el (dbus-test04-register-method): Skip on hydra.
This commit is contained in:
Michael Albinus 2021-11-01 13:22:28 +01:00
parent ba4daf2214
commit 84cd95e04c
1 changed files with 13 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

23
test/lisp/net/dbus-tests.el
View file

@ -630,16 +630,19 @@ This includes initialization and closing the bus."
:session dbus--test-service dbus--test-path :session dbus--test-service dbus--test-path
dbus--test-interface method1 "foo" "bar")) dbus--test-interface method1 "foo" "bar"))
`(dbus-error ,dbus-error-invalid-args "Wrong arguments (foo bar)"))) `(dbus-error ,dbus-error-invalid-args "Wrong arguments (foo bar)")))
;; Three arguments, D-Bus error activated by `dbus-error' signal. ;; Three arguments, D-Bus error activated by `dbus-error'
(should ;; signal. On hydra, it is not guaranteed which format the
(equal ;; error message arises. (Bug#51369)
(should-error (unless (getenv "EMACS_HYDRA_CI")
(dbus-call-method (should
:session dbus--test-service dbus--test-path (equal
dbus--test-interface method1 "foo" "bar" "baz")) (should-error
`(dbus-error (dbus-call-method
,dbus-error-failed :session dbus--test-service dbus--test-path
"D-Bus error: \"D-Bus signal\", \"foo\", \"bar\", \"baz\""))) dbus--test-interface method1 "foo" "bar" "baz"))
`(dbus-error
,dbus-error-failed
"D-Bus error: \"D-Bus signal\", \"foo\", \"bar\", \"baz\""))))
;; Unregister method. ;; Unregister method.
(should (dbus-unregister-object registered)) (should (dbus-unregister-object registered))